home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 41 / Amiga Format CD41 (1999-06)(Future Publishing)(GB)[!][issue 1999-07].iso / -seriously_amiga- / -commercial- / golded_demo / install < prev    next >
Windows Autorun File  |  1999-04-28  |  130KB  |  3,909 lines
  1. ; $VER: GoldED Studio 5.1.6 (19.3.1999)
  2.  
  3. (delopts "oknodelete" "force" "askuser")
  4.  
  5. ; -------------------------------- set constants -------------------------------
  6.  
  7. (set @studio_found                   1  )
  8. (set @studio_missing                 0  )
  9.  
  10. (set @studio_installtype_minimum     0  )
  11. (set @studio_installtype_user        1  )
  12. (set @studio_installtype_normal      2  )
  13.  
  14. (set @studio_components_golded       1  )
  15. (set @studio_components_starter      2  )
  16. (set @studio_components_docs         4  )
  17. (set @studio_components_addons       8  )
  18. (set @studio_components_developer    16 )
  19. (set @studio_components_screenshot   32 )
  20. (set @studio_components_recover      64 )
  21. (set @studio_components_config       128)
  22. (set @studio_components_all          255)
  23.  
  24. (set @studio_preset_display          1  )
  25. (set @studio_preset_interface        2  )
  26. (set @studio_preset_hunter           4  )
  27. (set @studio_preset_printer          8  )
  28. (set @studio_preset_context          16 )
  29. (set @studio_preset_syntax           32 )
  30. (set @studio_preset_layout           64 )
  31. (set @studio_preset_mouse            128)
  32. (set @studio_preset_menu             256)
  33.  
  34. (set @studio_preset_api              1  )
  35. (set @studio_preset_project          2  )
  36. (set @studio_preset_references       4  )
  37. (set @studio_preset_gadgets          8  )
  38. (set @studio_preset_tabs             16 )
  39. (set @studio_preset_keyboard         32 )
  40. (set @studio_preset_templates        64 )
  41. (set @studio_preset_misc             128)
  42. (set @studio_preset_dictionary       256)
  43.  
  44. (set @studio_cpu_68000               0  )
  45. (set @studio_cpu_68020               1  )
  46. (set @studio_cpu_68030               2  )
  47. (set @studio_cpu_68040               3  )
  48. (set @studio_cpu_68060               4  )
  49.  
  50. (set @studio_addons_envwww           1  )
  51. (set @studio_addons_envgde           2  )
  52. (set @studio_addons_envthe           4  )
  53. (set @studio_addons_envcpp           8  )
  54. (set @studio_addons_envstm           16 )
  55. (set @studio_addons_envsas           32 )
  56.  
  57. (set @studio_addons_envasm           1  )
  58. (set @studio_addons_envbat           2  )
  59. (set @studio_addons_envfax           4  )
  60. (set @studio_addons_envmdt           8  )
  61. (set @studio_addons_envthr           16 )
  62. (set @studio_addons_envjcy           32 )
  63.  
  64. (set @studio_addons_envprt           1  )
  65. (set @studio_addons_envrcs           2  )
  66. (set @studio_addons_envins           4  )
  67. (set @studio_addons_envwrp           8  )
  68. (set @studio_addons_envreg           16 )
  69. (set @studio_addons_envswp           32 )
  70.  
  71. (set @updatemode_reinstall           0  )
  72. (set @updatemode_add                 1  )
  73. (set @updatemode_remove              2  )
  74. (set @updatemode_presets             3  )
  75. (set @updatemode_registry            4  )
  76. (set @updatemode_startup             5  )
  77. (set @updatemode_exit                6  )
  78.  
  79. (set @studio_starter_ed              1  )
  80. (set @studio_starter_appicon         2  )
  81.  
  82. (set @studio_manual_history          1  )
  83. (set @studio_manual_licence          2  )
  84. (set @studio_manual_order            4  )
  85. (set @studio_manual_english          8  )
  86. (set @studio_manual_german           16 )
  87.  
  88. ; -------------------------------- set variables -------------------------------
  89.  
  90. (set studio_found         @studio_missing)
  91. (set studio_updatemode    @updatemode_components)
  92. (set studio_registered    0)
  93. (set studio_yourname     "")
  94. (set studio_serial       "")
  95. (set studio_path         "")
  96. (set studio_update       "")
  97. (set studio_language     "")
  98. (set studio_regedit      "")
  99. (set studio_components    0)
  100. (set studio_starter       0)
  101. (set studio_manual        0)
  102. (set studio_addons_a      0)
  103. (set studio_addons_b      0)
  104. (set studio_addons_c      0)
  105. (set studio_reboot        0)
  106.  
  107. ; -------------------------------- set strings ---------------------------------
  108.  
  109. (if (= @language "deutsch")
  110.  
  111.     (
  112.         (set #studio_reboot "Bitte starten Sie den Rechner nach der Installation neu !")
  113.  
  114.         (set #studio_demo
  115.  
  116.             (cat
  117.  
  118.                 "GoldED Studio 5 kann nicht über die Demo-Version    \n"
  119.                 "installiert werden (und umgekehrt). Deinstallieren  \n"
  120.                 "Sie zuerst die Demo-Version oder installieren Sie   \n"
  121.                 "in ein anderes Verzeichnis.                         \n"
  122.             )
  123.         )
  124.  
  125.         (set #studio_rexxerr
  126.  
  127.             (cat
  128.  
  129.                 "Warnung: Die ARexx-Installation ist unvollständig.  \n"
  130.                 "Die folgende Datei konnte nicht gefunden werden:    \n"
  131.                 "                                                    \n"
  132.             )
  133.         )
  134.  
  135.         (set #studio_overwrite
  136.  
  137.             (cat
  138.  
  139.                 "An dieser Stelle existiert schon ein Verzeichnis mit\n"
  140.                 "dem Namen Studio ! Soll mit der Installation in     \n"
  141.                 "dieses Verzeichnis fortgefahren werden ?            \n"
  142.             )
  143.         )
  144.  
  145.         (set #studio_overwrite_help
  146.  
  147.             (cat
  148.  
  149.                 "Möglicherweise gehört dieses Verzeichnis zu einem   \n"
  150.                 "anderen Programm oder einer älteren unvollständigen \n"
  151.                 "Installation.                                       \n"
  152.             )
  153.         )
  154.  
  155.         (set #studio_overwrite_install "Installieren")
  156.  
  157.         (set #studio_overwrite_cancel  "Anderes Verzeichnis wählen")
  158.  
  159.         (set #studio_badkick "Dieses Programm benötigt AmigaOS 3 !")
  160.  
  161.         (set #studio_notify
  162.  
  163.             (cat
  164.  
  165.                 "Während der letzten Installation ist ein Fehler     \n"
  166.                 "aufgetreten. Wir empfehlen die Wiederholung einer   \n"
  167.                 "Minimalinstallation in ein neues Verzeichnis.       \n"
  168.                 "                                                    \n"
  169.                 "Beenden sie bitte vor der erneuten Installation alle\n"
  170.                 "anderen laufenden Programme !                       \n"
  171.             )
  172.         )
  173.  
  174.         (set #studio_welcome
  175.  
  176.             (cat
  177.  
  178.                 "Willkommen beim GoldED Studio 5 Setup !             \n"
  179.                 "                                                    \n"
  180.                 "Mit diesem Programm wird GoldED Studio auf Ihrem    \n"
  181.                 "Computer installiert oder aktualisiert.             \n"
  182.                 "                                                    \n"
  183.                 "Es wird dringend empfohlen, alle anderen Programme  \n"
  184.                 "zu beenden, bevor Sie mit dem Setup fortfahren.     \n"
  185.                 "                                                    \n"
  186.                 "WARNUNG: Diese Software ist durch das nationale und \n"
  187.                 "internationale Urheberrecht geschützt. Unerlaubter  \n"
  188.                 "Vertrieb oder Verleih der Software oder einer ihrer \n"
  189.                 "Komponenten wird verfolgt.                          \n"
  190.             )
  191.         )
  192.  
  193.         (set #studio_installerr
  194.  
  195.             (cat
  196.  
  197.                 "Während der Installation ist ein Fehler aufgetraten.\n"
  198.                 "Eine Beschreibung der Fehlerursache finden Sie in   \n"
  199.                 "der Log-Datei im T:-Verzeichnis, sofern Sie zu      \n"
  200.                 "Beginn der Installation die Option LOGDATEI ERZEUGEN\n"
  201.                 "gewählt haben. Der Fehlercode ist:                  \n"
  202.                 "                                                    \n"
  203.             )
  204.         )
  205.  
  206.         (set #studio_yourname "Geben Sie Ihren Namen ein:")
  207.  
  208.         (set #studio_yourname_help
  209.  
  210.             (cat
  211.  
  212.                 "Die Eingabe des Namens ist zur Produktregistrierung \n"
  213.                 "erforderlich. Ohne Registrierung können Sie diese   \n"
  214.                 "Software nicht installieren.                        \n"
  215.             )
  216.         )
  217.  
  218.         (set #studio_serial "Geben Sie die Seriennummer ein:")
  219.  
  220.         (set #studio_serial_help
  221.  
  222.             (cat
  223.  
  224.                 "Sie finden die Seriennummer auf der Registrierkarte.\n"
  225.                 "Die Seriennummer besteht aus 21 Zeichen, die unter  \n"
  226.                 "Beachtung der Groß- und Kleinschreibung eingegeben  \n"
  227.                 "werden müssen.                                      \n"
  228.             )
  229.         )
  230.  
  231.         (set #studio_check
  232.  
  233.             (cat
  234.  
  235.                 "Ist diese Angabe korrekt ?                          \n"
  236.                 "                                                    \n"
  237.                 "%s, %s"
  238.             )
  239.         )
  240.  
  241.         (set #studio_check_continue "Korrekt")
  242.  
  243.         (set #studio_check_repeat "Eingabe wiederholen")
  244.  
  245.         (set #studio_found
  246.  
  247.             (cat
  248.  
  249.                 "Das Programm wurde schon einmal installiert:        \n"
  250.                 "                                                    \n"
  251.                 "Wählen Sie AKTUALISIEREN, um Komponenten            \n"
  252.                 "hinzuzufügen oder zu entfernen.                     \n"
  253.                 "                                                    \n"
  254.                 "Wählen Sie ANDERES VERZEICHNIS, um die Installation \n"
  255.                 "an anderer Stelle zu wiederholen.                   \n"
  256.             )
  257.         )
  258.  
  259.         (set #studio_found_help
  260.  
  261.             (cat
  262.  
  263.                 "AKTUALISIEREN                                       \n"
  264.                 "                                                    \n"
  265.                 "Ändert die vorhandene Installation. Dort vorhandne  \n"
  266.                 "Komponenten werden im weiteren Verlauf dieser       \n"
  267.                 "Installation aktualisiert.                          \n"
  268.                 "                                                    \n"
  269.                 "ANDERES VERZEICHNIS                                 \n"
  270.                 "                                                    \n"
  271.                 "Die Installation erfolgt in ein anderes Verzeichnis.\n"
  272.                 "Eine vorhandene Installation an anderer Stelle      \n"
  273.                 "bleibt erhalten. Sie sollten von dieser Möglichkeit \n"
  274.                 "nur Gebrauch machen, wenn mit der vorhandenen       \n"
  275.                 "Installation Probleme auftauchen, die eine          \n"
  276.                 "Aktualisierung nicht ratsam erscheinen lassen.      \n"
  277.             )
  278.         )
  279.  
  280.         (set #studio_found_confirm "Aktualisieren")
  281.  
  282.         (set #studio_found_newinstall "Anderes Verzeichnis")
  283.  
  284.         (set #studio_path_choose
  285.  
  286.             (cat
  287.  
  288.                 "Wählen Sie einen Pfad für die Installation. In dem  \n"
  289.                 "gewählten Pfad wird ein Verzeichnis für GoldED      \n"
  290.                 "Studio erzeugt:                                     \n"
  291.             )
  292.         )
  293.  
  294.         (set #studio_path_choose_help
  295.  
  296.             (cat
  297.  
  298.                 "Der Speicherplatzbedarf auf dem gewählten Medium    \n"
  299.                 "hängt von dem weiteren Installationsablauf ab.      \n"
  300.                 "Maximal werden 30 MB Speicherplatz benötigt.        \n"
  301.                 "                                                    \n"
  302.                 "Die Installation über eine vorhandene GoldED 3 oder \n"
  303.                 "GoldED 4 Installation ist nicht möglich. Die alten  \n"
  304.                 "Einstellungen können aber später übernommen werden, \n"
  305.                 "da Studio 5 abwärtskompatibel zu diesen             \n"
  306.                 "Programmversionen ist.                              \n"
  307.             )
  308.         )
  309.  
  310.         (set #studio_installtype "Wählen Sie die gewünschte Installationsart:")
  311.  
  312.         (set #studio_installtype_help
  313.  
  314.             (cat
  315.  
  316.                 "Sie können später jederzeit einzelen Komponeten     \n"
  317.                 "nachinstallieren oder installierte Komponenten      \n"
  318.                 "entfernen, indem Sie das Setup-Programm erneut      \n"
  319.                 "ausführen.                                          \n"
  320.             )
  321.         )
  322.  
  323.         (set #studio_installtype_minimum "Minimalinstallation (500 KB)")
  324.         (set #studio_installtype_user    "Benutzerdefiniert (bis zu 25 MB)")
  325.         (set #studio_installtype_normal  "Typische Installation (2 MB)")
  326.  
  327.         (set #studio_checking "Überprüfen der vorhandenen Installation ...")
  328.  
  329.         (set #studio_updatemode_reinstall "Installation aktualisieren")
  330.         (set #studio_updatemode_add       "Komponenten hinzufügen")
  331.         (set #studio_updatemode_remove    "Komponenten entfernen")
  332.         (set #studio_updatemode_presets   "Grundeinstellungen installieren")
  333.         (set #studio_updatemode_registry  "Registry wiederherstellen")
  334.         (set #studio_updatemode_startup   "User-Startup korrigieren")
  335.         (set #studio_updatemode_exit      "Setup beenden")
  336.  
  337.         (set #studio_updatemode_help
  338.  
  339.             (cat
  340.  
  341.                 "INSTALLATION AKTUALISIEREN                          \n"
  342.                 "                                                    \n"
  343.                 "Die bisher installierten Komponenten (mit Ausnahme  \n"
  344.                 "der Grundseinstellungen) werden neu installiert.    \n"
  345.                 "                                                    \n"
  346.                 "KOMPONENTEN HINZUFÜGEN/ENTFERNEN                    \n"
  347.                 "                                                    \n"
  348.                 "Ändert die vorhandene Installation durch Hinzufügen \n"
  349.                 "oder Entfernen einzelner Komponenten (Add-Ons,      \n"
  350.                 "Dokumentationen, usw.).                             \n"
  351.                 "                                                    \n"
  352.                 "GRUNDEINSTELLUNGEN INSTALLIEREN                     \n"
  353.                 "                                                    \n"
  354.                 "Erlaubt die selektive Installation von Einstellungen\n"
  355.                 "(Menu, Farben, usw.). Der Editor verwendet die      \n"
  356.                 "Grundeinstellungen, wenn normale Texte bearbeitet   \n"
  357.                 "werden, für die kein besonderer Dateityp definiert  \n"
  358.                 "wurde.                                              \n"
  359.                 "                                                    \n"
  360.                 "REGISTRY WIEDERHERSTELLEN                           \n"
  361.                 "                                                    \n"
  362.                 "Stellt die zentrale Konfigurationsdatei wieder her. \n"
  363.                 "Sie verlieren dadurch alle globalen Einstellungen im\n"
  364.                 "Editor sowie weiterhin alle Dateitypen mit Ausnahme \n"
  365.                 "des Dateityps TEXT !                                \n"
  366.                 "                                                    \n"
  367.                 "USER-STARTUP KORRIGIEREN                            \n"
  368.                 "                                                    \n"
  369.                 "Es wird der notwendige Assign auf das Verzeichnis   \n"
  370.                 "des Editors eingerichtet.                           \n"
  371.             )
  372.  
  373.         )
  374.  
  375.         (set #studio_components_install
  376.  
  377.             (cat
  378.  
  379.                 "Wählen Sie die Komponentengruppen, die installiert  \n"
  380.                 "werden sollen:                                      \n"
  381.             )
  382.         )
  383.  
  384.         (set #studio_components_update
  385.  
  386.             (cat
  387.  
  388.                 "Wählen Sie die Komponentengruppen, die installiert  \n"
  389.                 "bzw. aktualisiert werden sollen:                    \n"
  390.             )
  391.         )
  392.  
  393.         (set #studio_components_remove
  394.  
  395.             (cat
  396.  
  397.                 "Wählen Sie die Komponentengruppen, die ganz oder    \n"
  398.                 "teilweise entfernt werden sollen:                   \n"
  399.             )
  400.         )
  401.  
  402.         (set #studio_components_help
  403.  
  404.             (cat
  405.  
  406.                 "GOLDED (1.76 MB)                                    \n"
  407.                 "                                                    \n"
  408.                 "Der Editor GoldED sowie die unmittelbar vom Editor  \n"
  409.                 "benötigten Dateien und Verzeichnisse.               \n"
  410.                 "                                                    \n"
  411.                 "STARTER (0 - 15 KB)                                 \n"
  412.                 "                                                    \n"
  413.                 "Startprogramme, die die Verwendung des Editors      \n"
  414.                 "vereinfachen (Drag & Drop).                         \n"
  415.                 "                                                    \n"
  416.                 "DOKUMENTATION (36 K - 700 KB)                       \n"
  417.                 "                                                    \n"
  418.                 "Die Online-Dokumentation.                           \n"
  419.                 "                                                    \n"
  420.                 "ADD-ONS (0 - 25 MB)                                 \n"
  421.                 "                                                    \n"
  422.                 "Mitgeliefert werden die Rechtschreibprüfung Joyce,  \n"
  423.                 "ein Thesaurus, Anpassungen an diverse C-Compiler,   \n"
  424.                 "die HTML-Umgebung Webworld (zur Bearbeitung von     \n"
  425.                 "HTML-Dateien mit dem Editor), Anpassungen an        \n"
  426.                 "verschiedene E-Mail-Programme, usw.                 \n"
  427.                 "                                                    \n"
  428.                 "ENTWICKLERUNTERLAGEN (830 KB)                       \n"
  429.                 "                                                    \n"
  430.                 "Material für die Entwicklung von Erweiterungen für  \n"
  431.                 "GoldED: Quelltexte, Autodocs, Includes, Catalogs,   \n"
  432.                 "usw.                                                \n"
  433.                 "                                                    \n"
  434.                 "SCREENSHOT (40 KB)                                  \n"
  435.                 "                                                    \n"
  436.                 "Ein Screenshot von GoldED.                          \n"
  437.                 "                                                    \n"
  438.                 "NOTFALLPROGTRAMM (6 KB)                             \n"
  439.                 "                                                    \n"
  440.                 "Stellt nach Betriebssystemabstürzen den zuletzt     \n"
  441.                 "bearbeiteten Text wieder her.                       \n"
  442.             )
  443.         )
  444.  
  445.         (set #studio_components_golded     "GoldED")
  446.         (set #studio_components_starter    "Starter")
  447.         (set #studio_components_docs       "Dokumentation")
  448.         (set #studio_components_addons     "Add-Ons")
  449.         (set #studio_components_developer  "Entwicklerunterlagen")
  450.         (set #studio_components_screenshot "Screenshot")
  451.         (set #studio_components_recover    "Notfallprogramm")
  452.  
  453.         (set #studio_preset_install_A
  454.  
  455.             (cat
  456.  
  457.                 "Wählen Sie die Grundeinstellungen, die installiert  \n"
  458.                 "werden sollen (Seite 1 von 2):                      \n"
  459.             )
  460.         )
  461.  
  462.         (set #studio_preset_install_B
  463.  
  464.             (cat
  465.  
  466.                 "Wählen Sie die Grundeinstellungen, die installiert  \n"
  467.                 "werden sollen (Seite 2 von 2):                      \n"
  468.             )
  469.         )
  470.  
  471.         (set #studio_preset_install_help
  472.  
  473.             (cat
  474.  
  475.                 "Der Editor verwendet die Grundeinstellungen, wenn   \n"
  476.                 "normale Texte bearbeitet werden, für die kein       \n"
  477.                 "besonderer Dateityp definiert wurde.                \n"
  478.             )
  479.         )
  480.  
  481.         (set #studio_preset_display        "Anzeige")
  482.         (set #studio_preset_interface      "Benutzeroberfläche")
  483.         (set #studio_preset_hunter         "Dateisuche")
  484.         (set #studio_preset_printer        "Drucker")
  485.         (set #studio_preset_context        "Kontext")
  486.         (set #studio_preset_syntax         "Farbcodierung")
  487.         (set #studio_preset_layout         "Layout")
  488.         (set #studio_preset_mouse          "Maus")
  489.         (set #studio_preset_menu           "Menu")
  490.         (set #studio_preset_api            "Plug-Ins")
  491.         (set #studio_preset_project        "Projekte")
  492.         (set #studio_preset_references     "Referenzen")
  493.         (set #studio_preset_gadgets        "Symboleisten")
  494.         (set #studio_preset_tabs           "Tabulatoren")
  495.         (set #studio_preset_keyboard       "Tastatur")
  496.         (set #studio_preset_templates      "Templates")
  497.         (set #studio_preset_misc           "Verschiedenes")
  498.         (set #studio_preset_dictionary     "Wörterbücher")
  499.  
  500.         (set #studio_locale "Wählen Sie eine Sprache für die Grundeinstellungen:")
  501.  
  502.         (set #studio_locale_help
  503.  
  504.             (cat
  505.  
  506.                 "Die Berücksichtigung der vom Benutzer bevorzugten   \n"
  507.                 "Sprache bei der Beschriftung der Eingabefelder      \n"
  508.                 "erfolgt automatisch. Die Sprache der änderbaren     \n"
  509.                 "Komponenten (Einstellungen für Menus, Symbolleisten \n"
  510.                 "usw.) muß dagegen während der Installation gewählt  \n"
  511.                 "werden, damit die entsprechenden Konfigurationsdaten\n"
  512.                 "installiert werden können.                          \n"
  513.             )
  514.         )
  515.  
  516.         (set #studio_starter_help
  517.  
  518.             (cat
  519.  
  520.                 "SCHNELLSTARTER (5 KB)                               \n"
  521.                 "                                                    \n"
  522.                 "Das Startprogramm für den Editor: dieses Programm   \n"
  523.                 "kann wie ein normaler Editor verwendet werden,      \n"
  524.                 "bietet aber erweiterte Möglichkeiten, die sie beim  \n"
  525.                 "direkten Start von GoldED nicht haben. Der direkte  \n"
  526.                 "Start von GoldED sollte grundsätzlich vermieden     \n"
  527.                 "werden: verwenden Sie immer den Starter, um den     \n"
  528.                 "Editor zu starten.                                  \n"
  529.                 "                                                    \n"
  530.                 "DRAG & DROP STARTER (8 KB)                          \n"
  531.                 "                                                    \n"
  532.                 "Erzeugt ein Drag & Drop-Icon auf der Workbench: Sie \n"
  533.                 "können auf dieses Symbol klicken, um den Editor zu  \n"
  534.                 "starten oder Dateien auf dieses Symbol ziehen, um   \n"
  535.                 "sie im Editor zu öffnen.                            \n"
  536.             )
  537.         )
  538.  
  539.         (set #studio_starter_ed      "Schnellstarter")
  540.         (set #studio_starter_appicon "Drag & Drop-Starter")
  541.  
  542.         (set #studio_parts_install
  543.  
  544.             (cat
  545.  
  546.                 "                                                    \n"
  547.                 "Wählen Sie die Komponenten dieser Kategorie, die    \n"
  548.                 "installiert bzw. aktualisiert werden sollen:        \n"
  549.             )
  550.         )
  551.  
  552.         (set #studio_parts_install_a
  553.  
  554.             (cat
  555.  
  556.                 "                                                    \n"
  557.                 "Wählen Sie die Komponenten, die installiert bzw.    \n"
  558.                 "aktualisiert werden sollen (Seite 1 von 3):         \n"
  559.             )
  560.         )
  561.         (set #studio_parts_install_b
  562.  
  563.             (cat
  564.  
  565.                 "                                                    \n"
  566.                 "Wählen Sie die Komponenten, die installiert bzw.    \n"
  567.                 "aktualisiert werden sollen (Seite 2 von 3):         \n"
  568.             )
  569.         )
  570.  
  571.         (set #studio_parts_install_c
  572.  
  573.             (cat
  574.  
  575.                 "                                                    \n"
  576.                 "Wählen Sie die Komponenten, die installiert bzw.    \n"
  577.                 "aktualisiert werden sollen (Seite 3 von 3):         \n"
  578.             )
  579.         )
  580.  
  581.         (set #studio_parts_uninstall
  582.  
  583.             (cat
  584.  
  585.                 "                                                    \n"
  586.                 "Wählen Sie die Komponenten dieser Kategorie, die    \n"
  587.                 "entfernt werden sollen:                             \n"
  588.             )
  589.         )
  590.  
  591.         (set #studio_parts_uninstall_a
  592.  
  593.             (cat
  594.  
  595.                 "                                                    \n"
  596.                 "Wählen Sie die Komponenten dieser Kategorie, die    \n"
  597.                 "entfernt werden sollen (Seite 1 von 3):             \n"
  598.             )
  599.         )
  600.  
  601.         (set #studio_parts_uninstall_b
  602.  
  603.             (cat
  604.  
  605.                 "                                                    \n"
  606.                 "Wählen Sie die Komponenten dieser Kategorie, die    \n"
  607.                 "entfernt werden sollen (Seite 2 von 3):             \n"
  608.             )
  609.         )
  610.  
  611.         (set #studio_parts_uninstall_c
  612.  
  613.             (cat
  614.  
  615.                 "                                                    \n"
  616.                 "Wählen Sie die Komponenten dieser Kategorie, die    \n"
  617.                 "entfernt werden sollen (Seite 3 von 3):             \n"
  618.             )
  619.         )
  620.  
  621.         (set #studio_manual_help
  622.  
  623.             (cat
  624.  
  625.                 "HISTORY                                             \n"
  626.                 "                                                    \n"
  627.                 "Revisionsgeschichte (English)                       \n"
  628.                 "                                                    \n"
  629.                 "LIZENZ                                              \n"
  630.                 "                                                    \n"
  631.                 "Lizenzbedingungen.                                  \n"
  632.                 "                                                    \n"
  633.                 "BESTELLINFORMATIONEN                                \n"
  634.                 "                                                    \n"
  635.                 "Bezugsquellennachweis für Updates                   \n"
  636.                 "                                                    \n"
  637.                 "ENGLISCHE/DEUTSCHE DOKUMENTATION                    \n"
  638.                 "                                                    \n"
  639.                 "Online-Dokumentation im AmigaGuide-Format.          \n"
  640.             )
  641.         )
  642.  
  643.         (set #studio_manual_history  "History")
  644.         (set #studio_manual_licence  "Lizenz")
  645.         (set #studio_manual_order    "Bestellinformationen")
  646.         (set #studio_manual_english  "Englische Dokumentation")
  647.         (set #studio_manual_german   "Deutsche Dokumentation")
  648.  
  649.         (set #studio_registry
  650.  
  651.             (cat
  652.  
  653.                 "ACHTUNG: Beim Wiederherstellen dieser zentralen     \n"
  654.                 "Konfigurationsdatei verlieren Sie alle globalen     \n"
  655.                 "Einstellungen im Editor sowie weiterhin alle        \n"
  656.                 "Dateitypen mit Ausnahme des Dateityps TEXT !        \n"
  657.             )
  658.         )
  659.  
  660.         (set #studio_registry_restore "Wiederherstellen")
  661.         (set #studio_registry_keep    "Beibehalten")
  662.  
  663.         (set #studio_registry_help
  664.  
  665.             (cat
  666.  
  667.                 "Die zentrale Konfigurationsdatei (Registry) enthält \n"
  668.                 "alle dateitypunabhängigen globalen Einstellungen    \n"
  669.                 "inklusive der Dateitypliste.                        \n"
  670.             )
  671.         )
  672.  
  673.         (set #studio_nostartup "Die Datei s:user-startup fehlt oder ist beschädigt !\n")
  674.  
  675.         (set #startup_ask
  676.  
  677.             (cat
  678.  
  679.                 "Sollen die notwendigen Einträge in der Startup-Datei\n"
  680.                 "des Rechners jetzt erzeugt werden ?                 \n"
  681.             )
  682.         )
  683.  
  684.         (set #startup_ask_help
  685.  
  686.             (cat
  687.  
  688.                 "Es wird der notwendige Assign auf das Verzeichnis   \n"
  689.                 "des Editors eingerichtet.                           \n"
  690.             )
  691.         )
  692.  
  693.         (set #studio_addons_help
  694.  
  695.             (cat
  696.  
  697.                 "WEBWORLD                                            \n"
  698.                 "                                                    \n"
  699.                 "Erweiterung zur Bearbeitung von Internet-Seiten.    \n"
  700.                 "                                                    \n"
  701.                 "RECHTSCHREIBPRÜFUNG JOYCE                           \n"
  702.                 "                                                    \n"
  703.                 "Rechtschreibprüfung Deutsch/Englisch. Markiert die  \n"
  704.                 "Fehler im Text schon beim Schreiben. Belegt 2-4 MB  \n"
  705.                 "Speicher !                                          \n"
  706.                 "                                                    \n"
  707.                 "ROGET'S THESAURUS                                   \n"
  708.                 "                                                    \n"
  709.                 "Englisches Thesaurus: Umfangreiches Nachschlagewerk \n"
  710.                 "für Synonyme. Belegt 2 MB Speicher !                \n"
  711.                 "                                                    \n"
  712.                 "SCRIPTING                                           \n"
  713.                 "                                                    \n"
  714.                 "Unterstützung für die Bearbeitung der Startup-      \n"
  715.                 "Sequenz (Farbcodierung).                            \n"
  716.                 "                                                    \n"
  717.                 "AMIGAGUIDE PUBLISHER                                \n"
  718.                 "                                                    \n"
  719.                 "Erweiterung zur Bearbeitung von AmigaGuide-Dateien. \n"
  720.                 "                                                    \n"
  721.                 "SUPPORT FÜR STORMC                                  \n"
  722.                 "                                                    \n"
  723.                 "Umfangreicher Support für den StormC-Compiler: C/C++\n"
  724.                 "Farbhervorhebung, Toolbars, Anzeige der passenden   \n"
  725.                 "Klammer beim Schreiben, etc.                        \n"
  726.                 "                                                    \n"
  727.                 "SUPPORT FÜR SAS/C                                   \n"
  728.                 "                                                    \n"
  729.                 "Umfangreicher Support für den SAS/C-Compiler: C/C++ \n"
  730.                 "Farbhervorhebung, Toolbars, Anzeige der passenden   \n"
  731.                 "Klammer beim Schreiben, etc.                        \n"
  732.                 "                                                    \n"
  733.                 "SUPPORT FÜR ANDERE C-COMPILER                       \n"
  734.                 "                                                    \n"
  735.                 "Unterstützung für andere C-Compiler.                \n"
  736.                 "                                                    \n"
  737.                 "SUPPORT FÜR ASSEMBLER                               \n"
  738.                 "                                                    \n"
  739.                 "Unterstützung für die Bearbeitung von Assembler-    \n"
  740.                 "Quelltexten (Farbcodierung).                        \n"
  741.                 "                                                    \n"
  742.                 "FAXVERSAND                                          \n"
  743.                 "                                                    \n"
  744.                 "Aktuellen Text als Fax verschicken. Erfordert das   \n"
  745.                 "Faxprogramm STFax.                                  \n"
  746.                 "                                                    \n"
  747.                 "UNTERSTÜTZUNG FÜR MICRODOT                          \n"
  748.                 "                                                    \n"
  749.                 "Anpassung an Microdot zum Schreiben von E-Mails.    \n"
  750.                 "                                                    \n"
  751.                 "UNTERSTÜTZUNG FÜR THOR                              \n"
  752.                 "                                                    \n"
  753.                 "Anpassung an Thor zum Schreiben von E-Mails.        \n"
  754.                 "                                                    \n"
  755.                 "DRUCKERERWEITERUNG FÜR PCL-DRUCKER                  \n"
  756.                 "                                                    \n"
  757.                 "PCL-Druckprogramm. PCL ist dir Druckersprache, die  \n"
  758.                 "von den meisten Laserdruckern und den meisten HP    \n"
  759.                 "Tintenstrahldruckern verwendet wird (Geräte von     \n"
  760.                 "Epson und Canon sind i.d.R. keine PCL-Drucker).     \n"
  761.                 "                                                    \n"
  762.                 "INSTALLER-ASSISTENT                                 \n"
  763.                 "                                                    \n"
  764.                 "Diese Erweiterung erleichert das Erstellen von      \n"
  765.                 "Installationdateien für den Amiga Installer. Bei-   \n"
  766.                 "spielsweise werden zusammengehörende Klammern in    \n"
  767.                 "der gleichen Farbe dargestellt, so daß Fehler in    \n"
  768.                 "der Programmstruktur schnell zu finden sind.        \n"
  769.                 "                                                    \n"
  770.                 "ADD-ON WRAPPER                                      \n"
  771.                 "                                                    \n"
  772.                 "Dies ist ein Werkzeug für Entwickler, die Add-Ons   \n"
  773.                 "für GoldED erzeugen und vertreiben möchten.         \n"
  774.                 "                                                    \n"
  775.                 "TEXTREGISTER                                        \n"
  776.                 "                                                    \n"
  777.                 "Dieses Add-On erweitert Editorfenster um eine Knopf-\n"
  778.                 "leiste, die jeden geöffneten Text anzeigt.          \n"
  779.                 "                                                    \n"
  780.                 "MINESWEEPER                                         \n"
  781.                 "                                                    \n"
  782.                 "Ein kleines Spiel zum Zeitvertrieb in den Compiler- \n"
  783.                 "pausen.                                             \n"
  784.             )
  785.         )
  786.  
  787.         (set #studio_addons_envwww "Webworld")
  788.         (set #studio_addons_envjcy "Rechtschreibprüfung Joyce")
  789.         (set #studio_addons_envthe "Roget's Thesaurus")
  790.         (set #studio_addons_envbat "Scripting")
  791.         (set #studio_addons_envgde "AmigaGuide Publisher")
  792.         (set #studio_addons_envstm "Support für StormC")
  793.         (set #studio_addons_envsas "Support für SAS/C")
  794.         (set #studio_addons_envcpp "Support für andere C-Compiler")
  795.         (set #studio_addons_envasm "Support für Assembler")
  796.         (set #studio_addons_envfax "Faxversand")
  797.         (set #studio_addons_envmdt "Unterstützung für Microdot")
  798.         (set #studio_addons_envthr "Unterstützung für Thor")
  799.         (set #studio_addons_envprt "Druckererweiterung für PCL-Drucker")
  800.         (set #studio_addons_envrcs "Revisionskontrolle")
  801.         (set #studio_addons_envins "Installer-Assistent")
  802.         (set #studio_addons_envwrp "Add-On Wrapper")
  803.         (set #studio_addons_envreg "Textregister")
  804.         (set #studio_addons_envswp "Minesweeper")
  805.  
  806.         (set #studio_addons_install "Installation der Add-Ons ...")
  807.         (set #studio_addons_error   "Diese Add-On-Installation wurde abgebrochen und ist unvollständig !")
  808.  
  809.         (set #studio_ioerr "Lesefehler auf der Installations-CD !")
  810.     )
  811.  
  812.     ; english strings
  813.  
  814.     (
  815.         (set #studio_reboot "Please reboot the computer after installation !")
  816.  
  817.         (set #studio_demo
  818.  
  819.             (cat
  820.  
  821.                 "GoldED Studio 5 may not be installed over the demo  \n"
  822.                 "version (and vice versa). Uninstall the demo version\n"
  823.                 "and repeat this installation or choose another      \n"
  824.                 "directory.                                          \n"
  825.             )
  826.         )
  827.  
  828.         (set #studio_rexxerr
  829.  
  830.             (cat
  831.  
  832.                 "Warning: ARexx Installation is incomplete. File not \n"
  833.                 "found error:                                        \n"
  834.                 "                                                    \n"
  835.             )
  836.         )
  837.  
  838.         (set #studio_overwrite
  839.  
  840.             (cat
  841.  
  842.                 "A drawer named Studio already exists in this path ! \n"
  843.                 "Continue with installation into this drawer ?       \n"
  844.             )
  845.         )
  846.  
  847.         (set #studio_overwrite_help
  848.  
  849.             (cat
  850.  
  851.                 "This drawer could belong to another program or to a \n"
  852.                 "previous incomplete installation.                   \n"
  853.             )
  854.         )
  855.  
  856.         (set #studio_overwrite_install "Install")
  857.  
  858.         (set #studio_overwrite_cancel  "Choose other path")
  859.  
  860.         (set #studio_badkick "This program requires AmigaOS 3 !")
  861.  
  862.         (set #studio_notify
  863.  
  864.             (cat
  865.  
  866.                 "An error has occured during the last installation.  \n"
  867.                 "We recommend to repeat a minimum installation to    \n"
  868.                 "another drawer.                                     \n"
  869.                 "                                                    \n"
  870.                 "Please terminate all other programs before you      \n"
  871.                 "repeat installation !                               \n"
  872.             )
  873.         )
  874.  
  875.         (set #studio_welcome
  876.  
  877.             (cat
  878.  
  879.                 "Welcome to the GoldED Studio 5 Setup !              \n"
  880.                 "                                                    \n"
  881.                 "This program installs or updates GoldED Studio on   \n"
  882.                 "your computer.                                      \n"
  883.                 "                                                    \n"
  884.                 "We recommend to terminate all other programs before \n"
  885.                 "you continue with setup !                           \n"
  886.                 "                                                    \n"
  887.                 "WARNING: This software is protected by international\n"
  888.                 "and national laws. Unauthorized distribution or     \n"
  889.                 "rental of this software or one of its components are\n"
  890.                 "prosecuted to the full extent possible.             \n"
  891.             )
  892.         )
  893.  
  894.         (set #studio_installerr
  895.  
  896.             (cat
  897.  
  898.                 "An error has occured during the installation. An    \n"
  899.                 "error description can be found in the logfile (see  \n"
  900.                 "t: directory) if you did enable log file creation.  \n"
  901.                 "The error code is:                                  \n"
  902.                 "                                                    \n"
  903.             )
  904.         )
  905.  
  906.         (set #studio_yourname "Enter your name:")
  907.  
  908.         (set #studio_yourname_help
  909.  
  910.             (cat
  911.  
  912.                 "The name is required for product registration. The  \n"
  913.                 "software can not be installed without registration. \n"
  914.             )
  915.         )
  916.  
  917.         (set #studio_serial "Enter the serial code:")
  918.  
  919.         (set #studio_serial_help
  920.  
  921.             (cat
  922.  
  923.                 "You find the serial code on the registration card.  \n"
  924.                 "The code must be entered exactly as printed on the  \n"
  925.                 "registration card.                                  \n"
  926.             )
  927.         )
  928.  
  929.         (set #studio_check
  930.  
  931.             (cat
  932.  
  933.                 "Is this correct ?                                   \n"
  934.                 "                                                    \n"
  935.                 "%s, %s"
  936.             )
  937.         )
  938.  
  939.         (set #studio_check_continue "Accept")
  940.  
  941.         (set #studio_check_repeat "Modify")
  942.  
  943.         (set #studio_found
  944.  
  945.             (cat
  946.  
  947.                 "This software has been installed before:            \n"
  948.                 "                                                    \n"
  949.                 "Choose UPDATE to update, add or remove components   \n"
  950.                 "of the existing installation.                       \n"
  951.                 "                                                    \n"
  952.                 "Choose OTHER DIRECTORY to install again to another  \n"
  953.                 "directory.                                          \n"
  954.             )
  955.         )
  956.  
  957.         (set #studio_found_help
  958.  
  959.             (cat
  960.  
  961.                 "UPDATE                                              \n"
  962.                 "                                                    \n"
  963.                 "Updates the existing installation: update, add or   \n"
  964.                 "remove its components.                              \n"
  965.                 "                                                    \n"
  966.                 "OTHER DIRECTORY                                     \n"
  967.                 "                                                    \n"
  968.                 "Repeat installation to another directory. Your old  \n"
  969.                 "installation remains unchanged. You shouldn't use   \n"
  970.                 "this installation type unless you have problems with\n"
  971.                 "your existing installation.                         \n"
  972.             )
  973.         )
  974.  
  975.         (set #studio_found_confirm "Update")
  976.  
  977.         (set #studio_found_newinstall "Other directory")
  978.  
  979.         (set #studio_path_choose
  980.  
  981.             (cat
  982.  
  983.                 "Choose a path for installation. The setup program   \n"
  984.                 "will create a directory for GoldED Studio in the    \n"
  985.                 "path you specify:                                   \n"
  986.             )
  987.         )
  988.  
  989.         (set #studio_path_choose_help
  990.  
  991.             (cat
  992.  
  993.                 "Disk space requirements on the choosen drive depend \n"
  994.                 "on the further installation process. About 30 MB are\n"
  995.                 "required for a full installation.                   \n"
  996.                 "                                                    \n"
  997.                 "Installation over an existing GoldED 3 or GoldED 4  \n"
  998.                 "setup is not possible. You can load old settings    \n"
  999.                 "after installation since version 5 is backwards     \n"
  1000.                 "compatible with GoldED 4 configuration files.       \n"
  1001.             )
  1002.         )
  1003.  
  1004.         (set #studio_installtype "Choose the installation type:")
  1005.  
  1006.         (set #studio_installtype_help
  1007.  
  1008.             (cat
  1009.  
  1010.                 "You can add or remove components after installation \n"
  1011.                 "by running the setup program again.                 \n"
  1012.             )
  1013.         )
  1014.  
  1015.         (set #studio_installtype_minimum "Minimum installation (500 KB)")
  1016.         (set #studio_installtype_user    "User defined (up to 25 MB)")
  1017.         (set #studio_installtype_normal  "Typical installation (2 MB)")
  1018.  
  1019.         (set #studio_checking "Examining existing installation ...")
  1020.  
  1021.         (set #studio_updatemode_reinstall "Upgrade current installation")
  1022.         (set #studio_updatemode_add       "Add components")
  1023.         (set #studio_updatemode_remove    "Remove components")
  1024.         (set #studio_updatemode_presets   "Install default configuration")
  1025.         (set #studio_updatemode_registry  "Restore registry")
  1026.         (set #studio_updatemode_startup   "Fix user startup sequence")
  1027.         (set #studio_updatemode_exit      "Leave setup")
  1028.  
  1029.         (set #studio_updatemode_help
  1030.  
  1031.             (cat
  1032.  
  1033.                 "UPGRADE CURRENT INSTALLATION                        \n"
  1034.                 "                                                    \n"
  1035.                 "Installed components with exception of configuration\n"
  1036.                 "files are reinstalled.                              \n"
  1037.                 "                                                    \n"
  1038.                 "ADD/REMOVE COMPONENTS                               \n"
  1039.                 "                                                    \n"
  1040.                 "Modifies the current installation by adding or      \n"
  1041.                 "removing components (add-ons, manuals, etc.).       \n"
  1042.                 "                                                    \n"
  1043.                 "INSTALL DEFAULT CONFIGURATION                       \n"
  1044.                 "                                                    \n"
  1045.                 "Select the default configuration elements you would \n"
  1046.                 "like to see reinstalled (menu, colors, etc.). The   \n"
  1047.                 "editor uses the default configuration whenever you  \n"
  1048.                 "load a text which has no specific file type         \n"
  1049.                 "associated with it.                                 \n"
  1050.                 "                                                    \n"
  1051.                 "RESTORE REGISTRY                                    \n"
  1052.                 "                                                    \n"
  1053.                 "Reinstalls the central configuration file. You'll   \n"
  1054.                 "loose all global settings and all filetypes with    \n"
  1055.                 "exception of the type TEXT if you restore the       \n"
  1056.                 "registry !                                          \n"
  1057.                 "                                                    \n"
  1058.                 "FIX USER-STARTUP SEQUENCE                           \n"
  1059.                 "                                                    \n"
  1060.                 "Adds the assign required by this sofwtare to the    \n"
  1061.                 "user startup sequence of your system.               \n"
  1062.             )
  1063.  
  1064.         )
  1065.  
  1066.         (set #studio_components_install
  1067.  
  1068.             (cat
  1069.  
  1070.                 "Choose the categories to be installed:              \n"
  1071.             )
  1072.         )
  1073.  
  1074.         (set #studio_components_update
  1075.  
  1076.             (cat
  1077.  
  1078.                 "Choose the categories to be updated or installed:   \n"
  1079.             )
  1080.         )
  1081.  
  1082.         (set #studio_components_remove
  1083.  
  1084.             (cat
  1085.  
  1086.                 "Choose the categories to be removed completely or   \n"
  1087.                 "in parts:                                           \n"
  1088.             )
  1089.         )
  1090.  
  1091.         (set #studio_components_help
  1092.  
  1093.             (cat
  1094.  
  1095.                 "GOLDED (1.76 MB)                                    \n"
  1096.                 "                                                    \n"
  1097.                 "The editor GoldED and the files and directories     \n"
  1098.                 "required by GoldED.                                 \n"
  1099.                 "                                                    \n"
  1100.                 "STARTER (0 - 15 KB)                                 \n"
  1101.                 "                                                    \n"
  1102.                 "Starter programs which simplify usage of the editor \n"
  1103.                 "(Drag & Drop).                                      \n"
  1104.                 "                                                    \n"
  1105.                 "DOCUMENTATION (36 K - 700 KB)                       \n"
  1106.                 "                                                    \n"
  1107.                 "Online documentation.                               \n"
  1108.                 "                                                    \n"
  1109.                 "ADD-ONS (0 - 25 MB)                                 \n"
  1110.                 "                                                    \n"
  1111.                 "Includes the spell checking module Joyce, Roget's   \n"
  1112.                 "thesaurus, support for various C compilers, the     \n"
  1113.                 "HTML environment Webworld (for writing HTML files   \n"
  1114.                 "with the editor), support for various e-mailer,     \n"
  1115.                 "etc.                                                \n"
  1116.                 "                                                    \n"
  1117.                 "DSEVELOPER MATERIAL (830 KB)                        \n"
  1118.                 "                                                    \n"
  1119.                 "Material for developing extensions for GoldED:      \n"
  1120.                 "source codes, autodocs, includes, catalogs, etc.    \n"
  1121.                 "                                                    \n"
  1122.                 "SCREENSHOT (40 KB)                                  \n"
  1123.                 "                                                    \n"
  1124.                 "A screenshot of GoldED.                             \n"
  1125.                 "                                                    \n"
  1126.                 "EMERGENCY RECOVERY (6 KB)                           \n"
  1127.                 "                                                    \n"
  1128.                 "Restores a text lost during a system crash.         \n"
  1129.             )
  1130.         )
  1131.  
  1132.         (set #studio_components_golded     "GoldED")
  1133.         (set #studio_components_starter    "Starter")
  1134.         (set #studio_components_docs       "Documentation")
  1135.         (set #studio_components_addons     "Add-Ons")
  1136.         (set #studio_components_developer  "Developer material")
  1137.         (set #studio_components_screenshot "Screenshot")
  1138.         (set #studio_components_recover    "Emergency Recovery")
  1139.  
  1140.         (set #studio_preset_install_A
  1141.  
  1142.             (cat
  1143.  
  1144.                 "Chose the default configuration elements you would  \n"
  1145.                 "like to have installed (page 1 of 2):               \n"
  1146.             )
  1147.         )
  1148.  
  1149.         (set #studio_preset_install_B
  1150.  
  1151.             (cat
  1152.  
  1153.                 "Chose the default configuration elements you would  \n"
  1154.                 "like to have installed (page 2 of 2):               \n"
  1155.             )
  1156.         )
  1157.  
  1158.         (set #studio_preset_install_help
  1159.  
  1160.             (cat
  1161.  
  1162.                 "The editor uses the default configuration whenever  \n"
  1163.                 "you load a text which has no specific file type     \n"
  1164.                 "associated with it.                                 \n"
  1165.             )
  1166.         )
  1167.  
  1168.         (set #studio_preset_display        "Display configuration")
  1169.         (set #studio_preset_interface      "User interface")
  1170.         (set #studio_preset_hunter         "File search")
  1171.         (set #studio_preset_printer        "Printer configuration")
  1172.         (set #studio_preset_context        "Context")
  1173.         (set #studio_preset_syntax         "Syntax highlighting")
  1174.         (set #studio_preset_layout         "Formatting")
  1175.         (set #studio_preset_mouse          "Mouse")
  1176.         (set #studio_preset_menu           "Menu")
  1177.         (set #studio_preset_api            "Plug-Ins")
  1178.         (set #studio_preset_project        "Projects")
  1179.         (set #studio_preset_references     "References")
  1180.         (set #studio_preset_gadgets        "Toolbars")
  1181.         (set #studio_preset_tabs           "Tabs")
  1182.         (set #studio_preset_keyboard       "Keyboard")
  1183.         (set #studio_preset_templates      "Templates")
  1184.         (set #studio_preset_misc           "Miscellaneous")
  1185.         (set #studio_preset_dictionary     "Dictionaries")
  1186.  
  1187.         (set #studio_locale "Choose a language for the default configuration:")
  1188.  
  1189.         (set #studio_locale_help
  1190.  
  1191.             (cat
  1192.  
  1193.                 "While gadget labels are localized automatically, the\n"
  1194.                 "language for configurable elements (configuration of\n"
  1195.                 "menus, toolbars, etc.) has to be choosen during the \n"
  1196.                 "setup so that the correct files can be installed.   \n"
  1197.             )
  1198.         )
  1199.  
  1200.         (set #studio_starter_help
  1201.  
  1202.             (cat
  1203.  
  1204.                 "QUICK STARTER (5 KB)                                \n"
  1205.                 "                                                    \n"
  1206.                 "The starter for the editor: while this program can  \n"
  1207.                 "be use like a normal editor (GoldED), it offers you \n"
  1208.                 "features not available when running GoldED directly;\n"
  1209.                 "you should in fact avoid running GoldED directly and\n"
  1210.                 "always use the starter.                             \n"
  1211.                 "                                                    \n"
  1212.                 "DRAG & DROP STARTER (8 KB)                          \n"
  1213.                 "                                                    \n"
  1214.                 "Creates a drag and drop icon on your workbench where\n"
  1215.                 "you can drag files to open them in the editor.      \n"
  1216.             )
  1217.         )
  1218.  
  1219.         (set #studio_starter_ed      "Quick Starter")
  1220.         (set #studio_starter_appicon "Drag & Drop Starter")
  1221.  
  1222.         (set #studio_parts_install
  1223.  
  1224.             (cat
  1225.  
  1226.                 "                                                    \n"
  1227.                 "Choose the components of this category to be        \n"
  1228.                 "installed or updated:                               \n"
  1229.             )
  1230.         )
  1231.  
  1232.         (set #studio_parts_install_a
  1233.  
  1234.             (cat
  1235.  
  1236.                 "                                                    \n"
  1237.                 "Choose the components of this category to be        \n"
  1238.                 "installed or updated (page 1 of 3):                 \n"
  1239.             )
  1240.         )
  1241.  
  1242.         (set #studio_parts_install_b
  1243.  
  1244.             (cat
  1245.  
  1246.                 "                                                    \n"
  1247.                 "Choose the components of this category to be        \n"
  1248.                 "installed or updated (page 2 of 3):                 \n"
  1249.             )
  1250.         )
  1251.  
  1252.         (set #studio_parts_install_c
  1253.  
  1254.             (cat
  1255.  
  1256.                 "                                                    \n"
  1257.                 "Choose the components of this category to be        \n"
  1258.                 "installed or updated (page 3 of 3):                 \n"
  1259.             )
  1260.         )
  1261.  
  1262.         (set #studio_parts_uninstall
  1263.  
  1264.             (cat
  1265.  
  1266.                 "                                                    \n"
  1267.                 "Choose the components of this category to be        \n"
  1268.                 "removed:                                            \n"
  1269.             )
  1270.         )
  1271.  
  1272.         (set #studio_parts_uninstall_a
  1273.  
  1274.             (cat
  1275.  
  1276.                 "                                                    \n"
  1277.                 "Choose the components of this category to be        \n"
  1278.                 "removed (page 1 of 3):                              \n"
  1279.             )
  1280.         )
  1281.  
  1282.         (set #studio_parts_uninstall_b
  1283.  
  1284.             (cat
  1285.  
  1286.                 "                                                    \n"
  1287.                 "Choose the components of this category to be        \n"
  1288.                 "removed (page 2 of 3):                              \n"
  1289.             )
  1290.         )
  1291.  
  1292.         (set #studio_parts_uninstall_c
  1293.  
  1294.             (cat
  1295.  
  1296.                 "                                                    \n"
  1297.                 "Choose the components of this category to be        \n"
  1298.                 "removed (page 3 of 3):                              \n"
  1299.             )
  1300.         )
  1301.  
  1302.         (set #studio_manual_help
  1303.  
  1304.             (cat
  1305.  
  1306.                 "HISTORY                                             \n"
  1307.                 "                                                    \n"
  1308.                 "Revision history                                    \n"
  1309.                 "                                                    \n"
  1310.                 "LICENCE                                             \n"
  1311.                 "                                                    \n"
  1312.                 "User licence                                        \n"
  1313.                 "                                                    \n"
  1314.                 "ORDERING INFORMATION                                \n"
  1315.                 "                                                    \n"
  1316.                 "Information for ordering updates                    \n"
  1317.                 "                                                    \n"
  1318.                 "ENGLISH/GERMAN DOCUMENTATION                        \n"
  1319.                 "                                                    \n"
  1320.                 "Online documentation in AmigaGuide format.          \n"
  1321.             )
  1322.         )
  1323.  
  1324.         (set #studio_manual_history  "History")
  1325.         (set #studio_manual_licence  "Licence")
  1326.         (set #studio_manual_order    "Ordering information")
  1327.         (set #studio_manual_english  "English documentation")
  1328.         (set #studio_manual_german   "German documentation")
  1329.  
  1330.         (set #studio_registry
  1331.  
  1332.             (cat
  1333.  
  1334.                 "WARNING: You will loose all global configuration    \n"
  1335.                 "settings and all file types with exception of the   \n"
  1336.                 "type TEXT if you restore the registry !             \n"
  1337.             )
  1338.         )
  1339.  
  1340.         (set #studio_registry_restore "Restore registry")
  1341.         (set #studio_registry_keep    "Skip this step")
  1342.  
  1343.         (set #studio_registry_help
  1344.  
  1345.             (cat
  1346.  
  1347.                 "The central configuration file (registry) contains  \n"
  1348.                 "all file type independent configuration settings    \n"
  1349.                 "including the global list of file types.            \n"
  1350.             )
  1351.         )
  1352.  
  1353.         (set #studio_nostartup "The file s:user-startup is missing or corrupt !\n")
  1354.  
  1355.         (set #startup_ask
  1356.  
  1357.             (cat
  1358.  
  1359.                 "Should the changes to the system's user startup     \n"
  1360.                 "sequence (as required by this software) be done     \n"
  1361.                 "now ?                                               \n"
  1362.             )
  1363.         )
  1364.  
  1365.         (set #startup_ask_help
  1366.  
  1367.             (cat
  1368.  
  1369.                 "This will add an assign pointing to the installation\n"
  1370.                 "directory.                                          \n"
  1371.             )
  1372.         )
  1373.  
  1374.         (set #studio_addons_help
  1375.  
  1376.             (cat
  1377.  
  1378.                 "WEBWORLD                                            \n"
  1379.                 "                                                    \n"
  1380.                 "Add-On for publishing internet (HTML) documents.    \n"
  1381.                 "                                                    \n"
  1382.                 "JOYCE SPELL CHECKING                                \n"
  1383.                 "                                                    \n"
  1384.                 "Spellchecking for English and German. Highlights    \n"
  1385.                 "spelling errors in a text while you are typing.     \n"
  1386.                 "Requires 2-4 MB RAM !                               \n"
  1387.                 "                                                    \n"
  1388.                 "ROGET'S THESAURUS                                   \n"
  1389.                 "                                                    \n"
  1390.                 "English thesaurus: lists synonyms from a 100000     \n"
  1391.                 "words database. Requires 2 MB RAM !                 \n"
  1392.                 "                                                    \n"
  1393.                 "SCRIPTING                                           \n"
  1394.                 "                                                    \n"
  1395.                 "Support for editing the startup sequence (syntax    \n"
  1396.                 "highlighting).                                      \n"
  1397.                 "                                                    \n"
  1398.                 "AMIGAGUIDE PUBLISHER                                \n"
  1399.                 "                                                    \n"
  1400.                 "Add-On for publishing AmigaGuide documents.         \n"
  1401.                 "                                                    \n"
  1402.                 "SUPPORT FOR STORMC                                  \n"
  1403.                 "                                                    \n"
  1404.                 "Support for the StormC compiler: C/C++ syntax       \n"
  1405.                 "highlighting, toolbars, shows the matching bracket  \n"
  1406.                 "while typing, etc.                                  \n"
  1407.                 "                                                    \n"
  1408.                 "SUPPORT FOR SAS/C                                   \n"
  1409.                 "                                                    \n"
  1410.                 "Support for the StormC compiler: C/C++ syntax       \n"
  1411.                 "highlighting, toolbars, shows the matching bracket  \n"
  1412.                 "while typing, etc.                                  \n"
  1413.                 "                                                    \n"
  1414.                 "SUPPORT FOR OTHER C COMPILERS                       \n"
  1415.                 "                                                    \n"
  1416.                 "C++ syntax highlighting and other extensions.       \n"
  1417.                 "                                                    \n"
  1418.                 "SUPPORT FOR ASSEMBLER                               \n"
  1419.                 "                                                    \n"
  1420.                 "Support for editing assembler source codes.         \n"
  1421.                 "                                                    \n"
  1422.                 "FAX                                                 \n"
  1423.                 "                                                    \n"
  1424.                 "Sends current text as FAX. Requires the fax program \n"
  1425.                 "STFax.                                              \n"
  1426.                 "                                                    \n"
  1427.                 "SUPPORT FOR MICRODOT                                \n"
  1428.                 "                                                    \n"
  1429.                 "Support for writing e-mails with Microdot (syntax   \n"
  1430.                 "highlighting and signature support).                \n"
  1431.                 "                                                    \n"
  1432.                 "SUPPORT FOR THOR                                    \n"
  1433.                 "                                                    \n"
  1434.                 "Support for writing e-mails with Thor (syntax       \n"
  1435.                 "highlighting and signature support).                \n"
  1436.                 "                                                    \n"
  1437.                 "PCL PRINTING UTILITY                                \n"
  1438.                 "                                                    \n"
  1439.                 "A printing utility for PCL printers. PCL is the     \n"
  1440.                 "printer command language used by most laser printers\n"
  1441.                 "and most HP (but not Epson or Canon) inkjets.       \n"
  1442.                 "                                                    \n"
  1443.                 "INSTALLER WIZARD                                    \n"
  1444.                 "                                                    \n"
  1445.                 "This add-on simplifies the creation of installer    \n"
  1446.                 "scripts compatible with the Amiga Installer. For    \n"
  1447.                 "example, matching brackets have the same color so   \n"
  1448.                 "that nesting errors can be found quickly.           \n"
  1449.                 "                                                    \n"
  1450.                 "ADD-ON WRAPPER                                      \n"
  1451.                 "                                                    \n"
  1452.                 "The Add-On Wrapper is a tool for developers who wish\n"
  1453.                 "to create and distribute add-ons for GoldED.        \n"
  1454.                 "                                                    \n"
  1455.                 "TEXT REGISTER                                       \n"
  1456.                 "                                                    \n"
  1457.                 "This add-on adds a button stripe to editor windows, \n"
  1458.                 "one button for each open text. Click on one of these\n"
  1459.                 "buttons to bring the associated text to the front.  \n"
  1460.                 "                                                    \n"
  1461.                 "MINESWEEPER                                         \n"
  1462.                 "                                                    \n"
  1463.                 "The error messages of the compiler no longer provide\n"
  1464.                 "sufficient thrill for you ? Well, now you have the  \n"
  1465.                 "Minesweeper game to kill some time.                 \n"
  1466.             )
  1467.         )
  1468.  
  1469.         (set #studio_addons_envwww "Webworld")
  1470.         (set #studio_addons_envjcy "Joyce Spell Checking")
  1471.         (set #studio_addons_envthe "Roget's Thesaurus")
  1472.         (set #studio_addons_envbat "Scripting")
  1473.         (set #studio_addons_envgde "AmigaGuide Publisher")
  1474.         (set #studio_addons_envstm "Support for StormC")
  1475.         (set #studio_addons_envsas "Support for SAS/C")
  1476.         (set #studio_addons_envcpp "Support for other C compilers")
  1477.         (set #studio_addons_envasm "Support for Assembler")
  1478.         (set #studio_addons_envfax "Fax")
  1479.         (set #studio_addons_envmdt "Support for Microdot")
  1480.         (set #studio_addons_envthr "Support for Thor")
  1481.         (set #studio_addons_envprt "PCL printing utility")
  1482.         (set #studio_addons_envrcs "Revision control system")
  1483.         (set #studio_addons_envins "Installer Wizard")
  1484.         (set #studio_addons_envwrp "Add-On Wrapper")
  1485.         (set #studio_addons_envreg "Text Register")
  1486.         (set #studio_addons_envswp "Minesweeper")
  1487.  
  1488.         (set #studio_addons_install "Installation of Add-Ons ...")
  1489.         (set #studio_addons_error   "This add-on installation has been aborted and is incomplete !")
  1490.  
  1491.         (set #studio_ioerr "Read error on installation CD !")
  1492.     )
  1493. )
  1494.  
  1495. ; -------------------------------- check OS ------------------------------------
  1496.  
  1497. ; check if we are running under OS 3
  1498.  
  1499. (if (< (/ (getversion) 65536) 39)
  1500.  
  1501.     (
  1502.         (delete "env:studioinstall")
  1503.  
  1504.         (textfile
  1505.  
  1506.             (dest "env:studioinstall")
  1507.  
  1508.             (append "ERROR")
  1509.         )
  1510.  
  1511.         (abort #studio_badkick)
  1512.     )
  1513. )
  1514.  
  1515. (if (not (exists "sys:system/rexxmast"))
  1516.  
  1517.     (message (cat #studio_rexxerr "sys:system/rexxmast"))
  1518. )
  1519.  
  1520. (if (not (exists "libs:rexxsyslib.library"))
  1521.  
  1522.     (message (cat #studio_rexxerr "libs:rexxsyslib.library"))
  1523. )
  1524.  
  1525. ; --------------------------------- procedures ---------------------------------
  1526.  
  1527. ; uninstall an add-on (input: <studio_installpath>)
  1528.  
  1529. (procedure studio_proc_uninstall
  1530.  
  1531.     (
  1532.         (set studio_installcmd ("setup path \"%s\" icon \"%s\"" (pathonly studio_installpath) (fileonly studio_installpath)))
  1533.  
  1534.         ; request uninstall and run add-on setup
  1535.  
  1536.         (delete "env:installoptions")
  1537.  
  1538.         (textfile
  1539.  
  1540.             (dest "env:installoptions")
  1541.  
  1542.             (append "UNINSTALL")
  1543.         )
  1544.  
  1545.         (run studio_installcmd)
  1546.     )
  1547. )
  1548.  
  1549. ; install an add-on (input: <studio_installpath>)
  1550.  
  1551. (procedure studio_proc_install
  1552.  
  1553.     (
  1554.         (set studio_installcmd ("setup path \"%s\" icon \"%s\"" (pathonly studio_installpath) (fileonly studio_installpath)))
  1555.  
  1556.         ; set quiet mode
  1557.  
  1558.         (working #studio_addons_install)
  1559.  
  1560.         (delete "env:installoptions")
  1561.  
  1562.         (textfile
  1563.  
  1564.             (dest "env:installoptions")
  1565.  
  1566.             (append "INSTALLQUIET")
  1567.         )
  1568.  
  1569.         (run studio_installcmd)
  1570.  
  1571.         ; check return code of installation
  1572.  
  1573.         (if (exists "env:componentinstall")
  1574.  
  1575.             (set studio_installcode (getenv "componentinstall"))
  1576.  
  1577.             (set studio_installcode "ERROR")
  1578.         )
  1579.  
  1580.         (if (<> studio_installcode "OK")
  1581.  
  1582.             (message #studio_addons_error)
  1583.         )
  1584.     )
  1585. )
  1586.  
  1587. ; edit startup sequence
  1588.  
  1589. (procedure studio_proc_startup
  1590.  
  1591.     (
  1592.         (if (exists "s:user-startup")
  1593.  
  1594.             (
  1595.                 ; remove entries from previous installation
  1596.  
  1597.                 (run "installdata/programs/stripstartup >NIL: LINES=6 SECTIONNAME=HiSpeed")
  1598.  
  1599.                 (run "installdata/programs/stripstartup >NIL: LINES=6 SECTIONNAME=GED_quick")
  1600.             )
  1601.  
  1602.             (message #studio_nostartup)
  1603.         )
  1604.  
  1605.         (startup "GoldED"
  1606.  
  1607.             (prompt #startup_ask)
  1608.  
  1609.             (help #startup_ask_help)
  1610.  
  1611.             (command
  1612.  
  1613.                 ("assign golded: \"%s\"\n" (expandpath "golded:"))
  1614.  
  1615.                 ("assign libs:   \"%s\" add\n" (tackon (expandpath "golded:") "etc/libs"))
  1616.  
  1617.                 ("assign fonts:  \"%s\" add\n" (tackon (expandpath "golded:") "etc/fonts"))
  1618.             )
  1619.         )
  1620.     )
  1621. )
  1622.  
  1623. ; restore registry (input: none)
  1624.  
  1625. (procedure studio_proc_registry
  1626.  
  1627.     (
  1628.         (if (exists "golded:etc/registry/registry")
  1629.  
  1630.             (set studio_registry
  1631.  
  1632.                 (askbool
  1633.  
  1634.                     (prompt #studio_registry)
  1635.  
  1636.                     (choices
  1637.  
  1638.                         #studio_registry_restore
  1639.                         #studio_registry_keep
  1640.                     )
  1641.  
  1642.                     (help #studio_registry_help)
  1643.                 )
  1644.             )
  1645.  
  1646.             (set studio_registry 1)
  1647.         )
  1648.  
  1649.         (if (= studio_registry 1)
  1650.  
  1651.             (
  1652.                 (copyfiles
  1653.  
  1654.                     (source "installdata/registry/registry")
  1655.  
  1656.                     (dest "golded:etc/registry")
  1657.                 )
  1658.  
  1659.                 ; remove write protection for material copied from CD-ROM
  1660.  
  1661.                 (run "installdata/programs/unprotect basedir=golded:etc/registry")
  1662.  
  1663.                 ; save install path and serial code in registry
  1664.  
  1665.                 (run ("golded:add-ons/regedit/regedit SERIAL=\"%s\" INSTALLPATH=\"%s\"" studio_serial (expandpath "")))
  1666.             )
  1667.         )
  1668.     )
  1669. )
  1670.  
  1671. ; cleanup after installation (input: none)
  1672.  
  1673. (procedure studio_proc_cleanup
  1674.  
  1675.     (
  1676.         (delete "env:componentinstall")
  1677.  
  1678.         (delete "env:installoptions")
  1679.     )
  1680. )
  1681.  
  1682. ; save configuration (input: <studio_yourname>, <studio_language>, <studio_serial>)
  1683.  
  1684. (procedure studio_proc_savecfg
  1685.  
  1686.     (if (exists "golded:etc/env" (noreq))
  1687.  
  1688.         (
  1689.             (delete "golded:etc/env/name")
  1690.  
  1691.             (textfile
  1692.  
  1693.                 (dest "golded:etc/env/name")
  1694.  
  1695.                 (append studio_yourname)
  1696.             )
  1697.  
  1698.             (delete "golded:etc/env/language")
  1699.  
  1700.             (textfile
  1701.  
  1702.                 (dest "golded:etc/env/language")
  1703.  
  1704.                 (append studio_language)
  1705.             )
  1706.  
  1707.             (delete "golded:etc/env/serial")
  1708.  
  1709.             (textfile
  1710.  
  1711.                 (dest "golded:etc/env/serial")
  1712.  
  1713.                 (append studio_serial)
  1714.             )
  1715.         )
  1716.     )
  1717. )
  1718.  
  1719. ; select subcomponents for installation (input: <studio_components>, output: <studio_starter>, <studio_manual>)
  1720.  
  1721. (procedure studio_proc_chooseparts
  1722.  
  1723.     (
  1724.         ; choose add-ons
  1725.  
  1726.         (if (bitand studio_components @studio_components_addons)
  1727.  
  1728.             (
  1729.                 (set studio_addons_a
  1730.  
  1731.                     (askoptions
  1732.  
  1733.                         (prompt (cat #studio_components_addons #studio_parts_install_a))
  1734.  
  1735.                         (help #studio_addons_help)
  1736.  
  1737.                         (choices
  1738.  
  1739.                             #studio_addons_envwww
  1740.                             #studio_addons_envgde
  1741.                             #studio_addons_envthe
  1742.                             #studio_addons_envcpp
  1743.                             #studio_addons_envstm
  1744.                             #studio_addons_envsas
  1745.                         )   
  1746.  
  1747.                         (default studio_addons_a)
  1748.                     )
  1749.                 )
  1750.  
  1751.                 (set studio_addons_b
  1752.  
  1753.                     (askoptions
  1754.  
  1755.                         (prompt (cat #studio_components_addons #studio_parts_install_b))
  1756.  
  1757.                         (help #studio_addons_help)
  1758.  
  1759.                         (choices
  1760.  
  1761.                             #studio_addons_envasm
  1762.                             #studio_addons_envbat
  1763.                             #studio_addons_envfax
  1764.                             #studio_addons_envmdt
  1765.                             #studio_addons_envthr
  1766.                             #studio_addons_envjcy
  1767.                         )   
  1768.  
  1769.                         (default studio_addons_b)
  1770.                     )
  1771.                 )
  1772.  
  1773.                 (set studio_addons_c
  1774.  
  1775.                     (askoptions
  1776.  
  1777.                         (prompt (cat #studio_components_addons #studio_parts_install_c))
  1778.  
  1779.                         (help #studio_addons_help)
  1780.  
  1781.                         (choices
  1782.  
  1783.                             #studio_addons_envprt
  1784.                             #studio_addons_envrcs
  1785.                             #studio_addons_envins
  1786.                             #studio_addons_envwrp
  1787.                             #studio_addons_envreg
  1788.                             #studio_addons_envswp
  1789.                         )   
  1790.  
  1791.                         (default studio_addons_c)
  1792.                     )
  1793.                 )
  1794.             )
  1795.         )
  1796.  
  1797.         ; choose starter(s)
  1798.  
  1799.         (if (bitand studio_components @studio_components_starter)
  1800.  
  1801.             (
  1802.                 (set studio_starter
  1803.  
  1804.                     (askoptions
  1805.  
  1806.                         (prompt (cat #studio_components_starter #studio_parts_install))
  1807.  
  1808.                         (help #studio_starter_help)
  1809.  
  1810.                         (choices
  1811.  
  1812.                             #studio_starter_ed
  1813.                             #studio_starter_appicon
  1814.                         )
  1815.  
  1816.                         (default studio_starter)
  1817.                     )
  1818.                 )
  1819.             )
  1820.         )
  1821.  
  1822.         ; choose documentation
  1823.  
  1824.         (if (bitand studio_components @studio_components_docs)
  1825.  
  1826.             (
  1827.                 (set studio_manual
  1828.  
  1829.                     (askoptions
  1830.  
  1831.                         (prompt (cat #studio_components_docs #studio_parts_install))
  1832.  
  1833.                         (help #studio_manual_help)
  1834.  
  1835.                         (choices
  1836.  
  1837.                             #studio_manual_history
  1838.                             #studio_manual_licence
  1839.                             #studio_manual_order
  1840.                             #studio_manual_english
  1841.                             #studio_manual_german
  1842.                         )   
  1843.  
  1844.                         (default studio_manual)
  1845.                     )
  1846.                 )
  1847.             )
  1848.         )
  1849.     )
  1850. )
  1851.  
  1852. ; select subcomponents for removal (input: studio_remove, output: <studio_removeaddons_a>, <studio_removeaddons_b>, <studio_removestarter>, <studio_removemanual>)
  1853.  
  1854. (procedure studio_proc_removeparts
  1855.  
  1856.     (
  1857.         ; remove add-ons
  1858.  
  1859.         (if (bitand studio_remove @studio_components_addons)
  1860.  
  1861.             (
  1862.                 (set studio_removeaddons_a
  1863.  
  1864.                     (askoptions
  1865.  
  1866.                         (prompt (cat #studio_components_addons #studio_parts_uninstall_a))
  1867.  
  1868.                         (help #studio_addons_help)
  1869.  
  1870.                         (choices
  1871.  
  1872.                             #studio_addons_envwww
  1873.                             #studio_addons_envgde
  1874.                             #studio_addons_envthe
  1875.                             #studio_addons_envcpp
  1876.                             #studio_addons_envstm
  1877.                             #studio_addons_envsas
  1878.                         )   
  1879.  
  1880.                         (default 0)
  1881.                     )
  1882.                 )
  1883.  
  1884.                 (set studio_removeaddons_b
  1885.  
  1886.                     (askoptions
  1887.  
  1888.                         (prompt (cat #studio_components_addons #studio_parts_uninstall_b))
  1889.  
  1890.                         (help #studio_addons_help)
  1891.  
  1892.                         (choices
  1893.  
  1894.                             #studio_addons_envasm
  1895.                             #studio_addons_envbat
  1896.                             #studio_addons_envfax
  1897.                             #studio_addons_envmdt
  1898.                             #studio_addons_envthr
  1899.                             #studio_addons_envjcy
  1900.                         )   
  1901.  
  1902.                         (default 0)
  1903.                     )
  1904.                 )
  1905.  
  1906.                 (set studio_removeaddons_c
  1907.  
  1908.                     (askoptions
  1909.  
  1910.                         (prompt (cat #studio_components_addons #studio_parts_uninstall_c))
  1911.  
  1912.                         (help #studio_addons_help)
  1913.  
  1914.                         (choices
  1915.  
  1916.                             #studio_addons_envprt
  1917.                             #studio_addons_envrcs
  1918.                             #studio_addons_envins
  1919.                             #studio_addons_envwrp
  1920.                             #studio_addons_envreg
  1921.                             #studio_addons_envswp
  1922.                         )   
  1923.  
  1924.                         (default 0)
  1925.                     )
  1926.                 )
  1927.             )
  1928.         )
  1929.  
  1930.         ; remove starter(s)
  1931.  
  1932.         (if (bitand studio_remove @studio_components_starter)
  1933.  
  1934.             (
  1935.                 (set studio_removestarter
  1936.  
  1937.                     (askoptions
  1938.  
  1939.                         (prompt (cat #studio_components_starter #studio_parts_uninstall))
  1940.  
  1941.                         (help #studio_starter_help)
  1942.  
  1943.                         (choices
  1944.  
  1945.                             #studio_starter_ed
  1946.                             #studio_starter_appicon
  1947.                         )
  1948.  
  1949.                         (default 0)
  1950.                     )
  1951.                 )
  1952.             )
  1953.         )
  1954.  
  1955.         ; remove documentation
  1956.  
  1957.         (if (bitand studio_remove @studio_components_docs)
  1958.  
  1959.             (
  1960.                 (set studio_removemanual
  1961.  
  1962.                     (askoptions
  1963.  
  1964.                         (prompt (cat #studio_components_docs #studio_parts_uninstall))
  1965.  
  1966.                         (help #studio_manual_help)
  1967.  
  1968.                         (choices
  1969.  
  1970.                             #studio_manual_history
  1971.                             #studio_manual_licence
  1972.                             #studio_manual_order
  1973.                             #studio_manual_english
  1974.                             #studio_manual_german
  1975.                         )   
  1976.  
  1977.                         (default 0)
  1978.                     )
  1979.                 )
  1980.             )
  1981.         )
  1982.     )
  1983. )
  1984.  
  1985. ; choose preferred language (input: <studio_language>, output: <studio_language>
  1986.  
  1987. (procedure studio_proc_chooselanguage
  1988.  
  1989.     (
  1990.         (while (not (exists ("installdata/locale/%s/standard.menu" studio_language)))
  1991.  
  1992.             (if (= @language "english") (set studio_locale 0))
  1993.             (if (= @language "deutsch") (set studio_locale 1))
  1994.  
  1995.             (set studio_locale
  1996.  
  1997.                 (askchoice
  1998.  
  1999.                     (prompt #studio_locale)
  2000.  
  2001.                     (help #studio_locale_help)
  2002.  
  2003.                     (choices
  2004.  
  2005.                         "English"
  2006.                         "Deutsch"
  2007.                     )
  2008.  
  2009.                     (default studio_locale)
  2010.                 )
  2011.             )
  2012.  
  2013.             (if (= studio_locale 0) (set studio_language "english"))
  2014.             (if (= studio_locale 1) (set studio_language "deutsch"))
  2015.         )
  2016.     )
  2017. )
  2018.  
  2019. ; install registry editor (input: none)
  2020.  
  2021. (procedure studio_proc_installregedit
  2022.  
  2023.     (
  2024.         (if (= studio_regedit "")
  2025.  
  2026.             (
  2027.                 (set studio_regedit "golded:add-ons/regedit/regedit")
  2028.  
  2029.                 (if (exists studio_regedit)
  2030.  
  2031.                     (
  2032.                         (set oldver (getversion studio_regedit))
  2033.  
  2034.                         (set newver (getversion "installdata/golded/add-ons/regedit/regedit"))
  2035.  
  2036.                         (if (> newver oldver)
  2037.  
  2038.                             (copyfiles
  2039.  
  2040.                                 (source "installdata/golded/add-ons/regedit")
  2041.  
  2042.                                 (dest "golded:add-ons/regedit")
  2043.  
  2044.                                 (all)
  2045.                             )
  2046.                         )
  2047.                     )
  2048.  
  2049.                     (copyfiles
  2050.  
  2051.                         (source "installdata/golded/add-ons/regedit")
  2052.  
  2053.                         (dest "golded:add-ons/regedit")
  2054.  
  2055.                         (all)
  2056.                     )
  2057.                 )
  2058.             )
  2059.         )
  2060.     )
  2061. )
  2062.  
  2063. ; check existing setup (input: <studio_path>, output: <studio_yourname>, <studio_serial>, <studio_components>)
  2064.  
  2065. (procedure studio_proc_checksetup
  2066.  
  2067.     (
  2068.         (working studio_checking)
  2069.  
  2070.         (makeassign "golded" studio_path)
  2071.  
  2072.         (if (exists "golded:" (noreq))
  2073.  
  2074.             (
  2075.                 ; read env variables from last installation
  2076.  
  2077.                 (if (exists "golded:etc/env")
  2078.  
  2079.                     (
  2080.                         (if (= (exists "golded:etc/env/name") 1)
  2081.  
  2082.                             (
  2083.                                 (run "installdata/programs/setenv NAME=NAME FROM=golded:etc/env/name")
  2084.  
  2085.                                 (set studio_yourname (getenv "NAME"))
  2086.                             )
  2087.                         )
  2088.  
  2089.                         (if (= (exists "golded:etc/env/language") 1)
  2090.  
  2091.                             (
  2092.                                 (run "installdata/programs/setenv NAME=LANGUAGE FROM=golded:etc/env/language")
  2093.  
  2094.                                 (set studio_language (getenv "LANGUAGE"))
  2095.                             )
  2096.                         )
  2097.  
  2098.                         (if (= (exists "golded:etc/env/serial") 1)
  2099.  
  2100.                             (
  2101.                                 (run "installdata/programs/setenv NAME=SERIAL FROM=golded:etc/env/serial")
  2102.  
  2103.                                 (set studio_serial (getenv "SERIAL"))
  2104.                             )
  2105.                         )
  2106.                     )
  2107.                 )
  2108.  
  2109.                 ; check installed components
  2110.  
  2111.                 (set studio_components 0)
  2112.                 (set studio_starter    0)
  2113.                 (set studio_manual     0)
  2114.                 (set studio_addons_a   0)
  2115.                 (set studio_addons_b   0)
  2116.                 (set studio_addons_c   0)
  2117.  
  2118.                 (if (exists "golded:golded")
  2119.  
  2120.                     (set studio_components (+ studio_components @studio_components_golded))
  2121.                 )
  2122.  
  2123.                 (if (exists "golded:ed")
  2124.  
  2125.                     (set studio_starter (+ studio_starter @studio_starter_ed))
  2126.                 )
  2127.  
  2128.                 (if (exists "golded:Drag & drop")
  2129.  
  2130.                     (set studio_starter (+ studio_starter @studio_starter_appicon))
  2131.                 )
  2132.  
  2133.                 (if (<> studio_starter 0)
  2134.  
  2135.                     (set studio_components (+ studio_components @studio_components_starter))
  2136.                 )
  2137.  
  2138.                 (if (exists "golded:History")
  2139.  
  2140.                     (set studio_manual (+ studio_manual @studio_manual_history))
  2141.                 )
  2142.  
  2143.                 (if (exists "golded:Licence")
  2144.  
  2145.                     (set studio_manual (+ studio_manual @studio_manual_licence))
  2146.                 )
  2147.  
  2148.                 (if (exists "golded:Order")
  2149.  
  2150.                     (set studio_manual (+ studio_manual @studio_manual_order))
  2151.                 )
  2152.  
  2153.                 (if (exists "golded:Manual")
  2154.  
  2155.                     (set studio_manual (+ studio_manual @studio_manual_english))
  2156.                 )
  2157.  
  2158.                 (if (exists "golded:Anleitung")
  2159.  
  2160.                     (set studio_manual (+ studio_manual @studio_manual_german))
  2161.                 )
  2162.  
  2163.                 (if (<> 0 studio_manual)
  2164.  
  2165.                     (set studio_components (+ studio_components @studio_components_docs))
  2166.                 )
  2167.  
  2168.                 (if (exists "golded:add-ons/webworld")
  2169.  
  2170.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envwww))
  2171.                 )
  2172.  
  2173.                 (if (exists "golded:add-ons/makeguide")
  2174.  
  2175.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envgde))
  2176.                 )
  2177.  
  2178.                 (if (exists "golded:add-ons/thesaurus")
  2179.  
  2180.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envthe))
  2181.                 )
  2182.  
  2183.                 (if (exists "golded:add-ons/c++")
  2184.  
  2185.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envcpp))
  2186.                 )
  2187.  
  2188.                 (if (exists "golded:add-ons/stormc")
  2189.  
  2190.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envstm))
  2191.                 )
  2192.  
  2193.                 (if (exists "golded:add-ons/sas-c")
  2194.  
  2195.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envsas))
  2196.                 )
  2197.  
  2198.                 (if (exists "golded:add-ons/a68k")
  2199.  
  2200.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envasm))
  2201.                 )
  2202.  
  2203.                 (if (exists "golded:add-ons/scripting")
  2204.  
  2205.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envbat))
  2206.                 )
  2207.  
  2208.                 (if (exists "golded:add-ons/fax")
  2209.  
  2210.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envfax))
  2211.                 )
  2212.  
  2213.                 (if (exists "golded:add-ons/microdot")
  2214.  
  2215.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envmdt))
  2216.                 )
  2217.  
  2218.                 (if (exists "golded:add-ons/thor")
  2219.  
  2220.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envthr))
  2221.                 )
  2222.  
  2223.                 (if (exists "golded:add-ons/joyce")
  2224.  
  2225.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envjcy))
  2226.                 )
  2227.  
  2228.                 (if (exists "golded:add-ons/print")
  2229.  
  2230.                     (set studio_addons_c (+ studio_addons_c @studio_addons_envprt))
  2231.                 )
  2232.  
  2233.                 (if (exists "golded:add-ons/rcs")
  2234.  
  2235.                     (set studio_addons_c (+ studio_addons_c @studio_addons_envrcs))
  2236.                 )
  2237.  
  2238.                 (if (exists "golded:add-ons/installer")
  2239.  
  2240.                     (set studio_addons_c (+ studio_addons_c @studio_addons_envins))
  2241.                 )
  2242.  
  2243.                 (if (exists "golded:add-ons/wrapper")
  2244.  
  2245.                     (set studio_addons_c (+ studio_addons_c @studio_addons_envwrp))
  2246.                 )
  2247.  
  2248.                 (if (exists "golded:add-ons/register")
  2249.  
  2250.                     (set studio_addons_c (+ studio_addons_c @studio_addons_envreg))
  2251.                 )
  2252.  
  2253.                 (if (exists "golded:add-ons/minesweeper")
  2254.  
  2255.                     (set studio_addons_c (+ studio_addons_c @studio_addons_envswp))
  2256.                 )
  2257.  
  2258.                 (if (or (<> studio_addons_a 0) (<> studio_addons_b 0) (<> studio_addons_c 0))
  2259.  
  2260.                     (set studio_components (+ studio_components @studio_components_addons))
  2261.                 )
  2262.                 
  2263.                 (if (or (exists "golded:developer/api") (exists "golded:developer/catalogs") (exists "golded:developer/include") (exists "golded:developer/registry") (exists "golded:developer/scanner") (exists "golded:developer/source") (exists "golded:developer/syntax"))
  2264.                 
  2265.                     (set studio_components (+ studio_components @studio_components_developer))
  2266.                 )
  2267.                 
  2268.                 (if (exists "golded:screenshot")
  2269.                 
  2270.                     (set studio_components (+ studio_components @studio_components_screenshot))
  2271.                 )
  2272.                 
  2273.                 (if (exists "golded:recover")
  2274.                 
  2275.                     (set studio_components (+ studio_components @studio_components_recover))
  2276.                 )
  2277.             )
  2278.         )
  2279.     )
  2280. )
  2281.  
  2282. ; install presets (input: none)
  2283.  
  2284. (procedure studio_proc_installpresets
  2285.  
  2286.     (
  2287.         (set studio_preset_install_a
  2288.  
  2289.             (askoptions
  2290.  
  2291.                 (prompt #studio_preset_install_a)
  2292.  
  2293.                 (choices
  2294.  
  2295.                     #studio_preset_display     
  2296.                     #studio_preset_interface   
  2297.                     #studio_preset_hunter      
  2298.                     #studio_preset_printer     
  2299.                     #studio_preset_context
  2300.                     #studio_preset_syntax      
  2301.                     #studio_preset_layout      
  2302.                     #studio_preset_mouse       
  2303.                     #studio_preset_menu        
  2304.                 )
  2305.  
  2306.                 (default 0)
  2307.  
  2308.                 (help #studio_preset_install_help)
  2309.             )
  2310.         )
  2311.  
  2312.         (set studio_preset_install_b
  2313.  
  2314.             (askoptions
  2315.  
  2316.                 (prompt #studio_preset_install_b)
  2317.  
  2318.                 (choices
  2319.  
  2320.                     #studio_preset_api         
  2321.                     #studio_preset_project     
  2322.                     #studio_preset_references  
  2323.                     #studio_preset_gadgets     
  2324.                     #studio_preset_tabs        
  2325.                     #studio_preset_keyboard    
  2326.                     #studio_preset_templates   
  2327.                     #studio_preset_misc        
  2328.                     #studio_preset_dictionary  
  2329.                 )
  2330.  
  2331.                 (default 0)
  2332.  
  2333.                 (help #studio_preset_install_help)
  2334.             )
  2335.         )
  2336.  
  2337.         (if (or studio_preset_install_a studio_preset_install_b)
  2338.  
  2339.             (
  2340.                 (if (bitand studio_preset_install_a (+ @studio_preset_mouse @studio_preset_menu @studio_preset_gadgets))
  2341.  
  2342.                     (studio_proc_chooselanguage)
  2343.                 )
  2344.  
  2345.                 (if (bitand studio_preset_install_a @studio_preset_display)
  2346.  
  2347.                     (
  2348.                         (run ("%s PRESET installdata/locale/%s/standard.display" studio_regedit studio_language))
  2349.  
  2350.                         ; reset font
  2351.  
  2352.                         (run bin "installdata/programs/installfont file=golded:etc/registry/presets/standard.display")
  2353.                     )
  2354.                 )
  2355.  
  2356.                 (if (bitand studio_preset_install_a @studio_preset_interface)
  2357.  
  2358.                     (run ("%s PRESET installdata/registry/presets/standard.interface" studio_regedit))
  2359.                 )
  2360.  
  2361.                 (if (bitand studio_preset_install_a @studio_preset_hunter)
  2362.  
  2363.                     (run ("%s PRESET installdata/registry/presets/standard.hunter" studio_regedit))
  2364.                 )
  2365.  
  2366.                 (if (bitand studio_preset_install_a @studio_preset_printer)
  2367.  
  2368.                     (run ("%s PRESET installdata/registry/presets/standard.printer" studio_regedit))
  2369.                 )
  2370.  
  2371.                 (if (bitand studio_preset_install_a @studio_preset_context)
  2372.  
  2373.                     (run ("%s PRESET installdata/registry/presets/standard.context" studio_regedit))
  2374.                 )
  2375.  
  2376.                 (if (bitand studio_preset_install_a @studio_preset_syntax)
  2377.  
  2378.                     (run ("%s PRESET installdata/registry/presets/standard.syntax" studio_regedit))
  2379.                 )
  2380.  
  2381.                 (if (bitand studio_preset_install_a @studio_preset_layout)
  2382.  
  2383.                     (run ("%s PRESET installdata/registry/presets/standard.layout" studio_regedit))
  2384.                 )
  2385.  
  2386.                 (if (bitand studio_preset_install_a @studio_preset_mouse)
  2387.  
  2388.                     (run ("%s PRESET installdata/locale/%s/standard.mouse" studio_regedit studio_language))
  2389.                 )
  2390.  
  2391.                 (if (bitand studio_preset_install_a @studio_preset_menu)
  2392.  
  2393.                     (run ("%s PRESET installdata/locale/%s/standard.menu" studio_regedit studio_language))
  2394.                 )
  2395.  
  2396.                 (if (bitand studio_preset_install_b @studio_preset_api)
  2397.  
  2398.                     (run ("%s PRESET installdata/registry/presets/standard.api" studio_regedit))
  2399.                 )
  2400.  
  2401.                 (if (bitand studio_preset_install_b @studio_preset_project)
  2402.  
  2403.                     (run ("%s PRESET installdata/registry/presets/standard.project" studio_regedit))
  2404.                 )
  2405.  
  2406.                 (if (bitand studio_preset_install_b @studio_preset_references)
  2407.  
  2408.                     (run ("%s PRESET installdata/registry/presets/standard.references" studio_regedit))
  2409.                 )
  2410.  
  2411.                 (if (bitand studio_preset_install_b @studio_preset_gadgets)
  2412.  
  2413.                     (run ("%s PRESET installdata/locale/%s/standard.gadgets" studio_regedit studio_language))
  2414.                 )
  2415.  
  2416.                 (if (bitand studio_preset_install_b @studio_preset_tabs)
  2417.  
  2418.                     (run ("%s PRESET installdata/registry/presets/standard.tabs" studio_regedit))
  2419.                 )
  2420.  
  2421.                 (if (bitand studio_preset_install_b @studio_preset_keyboard)
  2422.  
  2423.                     (run ("%s PRESET installdata/registry/presets/standard.keyboard" studio_regedit))
  2424.                 )
  2425.  
  2426.                 (if (bitand studio_preset_install_b @studio_preset_templates)
  2427.  
  2428.                     (run ("%s PRESET installdata/registry/presets/standard.templates" studio_regedit))
  2429.                 )
  2430.  
  2431.                 (if (bitand studio_preset_install_b @studio_preset_misc)
  2432.  
  2433.                     (run ("%s PRESET installdata/registry/presets/standard.misc" studio_regedit))
  2434.                 )
  2435.  
  2436.                 (if (bitand studio_preset_install_b @studio_preset_dictionary)
  2437.  
  2438.                     (run ("%s PRESET installdata/registry/presets/standard.dictionary" studio_regedit))
  2439.                 )
  2440.             )
  2441.         )
  2442.  
  2443.         (run "installdata/programs/unprotect basedir=golded:etc/registry")
  2444.     )
  2445. )
  2446.  
  2447. ; install components (input: <studio_components>, <studio_starter>, <studio_manual>)
  2448.  
  2449. (procedure studio_proc_installcomponents
  2450.  
  2451.     (
  2452.         ; always install reqtools library
  2453.  
  2454.         (if (not (exists "golded:etc/libs/reqtools.library"))
  2455.  
  2456.             (
  2457.                 (copyfiles
  2458.  
  2459.                     (source "bonus/reqtools/reqtools.library")
  2460.  
  2461.                     (dest "golded:etc/libs")
  2462.                 )
  2463.  
  2464.                 (run "assign libs: golded:etc/libs add")
  2465.             )
  2466.         )
  2467.  
  2468.         ; install editor
  2469.  
  2470.         (if (bitand studio_components @studio_components_golded)
  2471.  
  2472.             (
  2473.                 ; always install 68000 binary (all other versions are optional and untested)
  2474.  
  2475.                 (set studio_cpu @studio_cpu_68000)
  2476.  
  2477.                 (if (= studio_cpu @studio_cpu_68000)
  2478.  
  2479.                     (set studio_binary "68000")
  2480.                 )
  2481.  
  2482.                 (if (= studio_cpu @studio_cpu_68020)
  2483.  
  2484.                     (set studio_binary "68020")
  2485.                 )
  2486.  
  2487.                 (if (= studio_cpu @studio_cpu_68030)
  2488.  
  2489.                     (set studio_binary "68030")
  2490.                 )
  2491.  
  2492.                 (if (= studio_cpu @studio_cpu_68040)
  2493.  
  2494.                     (set studio_binary "68040")
  2495.                 )
  2496.  
  2497.                 (if (= studio_cpu @studio_cpu_68060)
  2498.  
  2499.                     (set studio_binary "68060")
  2500.                 )
  2501.  
  2502.                 (copyfiles
  2503.  
  2504.                     (source (cat "installdata/cpu/" studio_binary "/GoldED"))
  2505.  
  2506.                     (dest "golded:")
  2507.                 )
  2508.  
  2509.                 (copyfiles
  2510.  
  2511.                     (source "installdata/golded/GoldED.info")
  2512.  
  2513.                     (dest "golded:")
  2514.                 )
  2515.  
  2516.                 (copyfiles
  2517.  
  2518.                     (source "installdata/golded/etc")
  2519.  
  2520.                     (dest "golded:etc")
  2521.  
  2522.                     (all)
  2523.                 )
  2524.  
  2525.                 (run "assign fonts: golded:etc/fonts add")
  2526.  
  2527.                 ; request reboot
  2528.  
  2529.                 (set studio_reboot 1)
  2530.             )
  2531.         )
  2532.  
  2533.         ; install presets and registry
  2534.  
  2535.         (if (bitand studio_components @studio_components_config)
  2536.  
  2537.             (
  2538.                 (studio_proc_chooselanguage)
  2539.  
  2540.                 (run ("%s PRESET installdata/registry/presets/standard.interface"  studio_regedit))
  2541.                 (run ("%s PRESET installdata/registry/presets/standard.hunter"     studio_regedit))
  2542.                 (run ("%s PRESET installdata/registry/presets/standard.printer"    studio_regedit))
  2543.                 (run ("%s PRESET installdata/registry/presets/standard.context"    studio_regedit))
  2544.                 (run ("%s PRESET installdata/registry/presets/standard.syntax"     studio_regedit))
  2545.                 (run ("%s PRESET installdata/registry/presets/standard.layout"     studio_regedit))
  2546.                 (run ("%s PRESET installdata/registry/presets/standard.api"        studio_regedit))
  2547.                 (run ("%s PRESET installdata/registry/presets/standard.project"    studio_regedit))
  2548.                 (run ("%s PRESET installdata/registry/presets/standard.references" studio_regedit))
  2549.                 (run ("%s PRESET installdata/registry/presets/standard.tabs"       studio_regedit))
  2550.                 (run ("%s PRESET installdata/registry/presets/standard.keyboard"   studio_regedit))
  2551.                 (run ("%s PRESET installdata/registry/presets/standard.templates"  studio_regedit))
  2552.                 (run ("%s PRESET installdata/registry/presets/standard.misc"       studio_regedit))
  2553.                 (run ("%s PRESET installdata/registry/presets/standard.dictionary" studio_regedit))
  2554.  
  2555.                 ; localized presets
  2556.  
  2557.                 (run ("%s PRESET installdata/locale/%s/standard.mouse  " studio_regedit studio_language))
  2558.                 (run ("%s PRESET installdata/locale/%s/standard.menu   " studio_regedit studio_language))
  2559.                 (run ("%s PRESET installdata/locale/%s/standard.gadgets" studio_regedit studio_language))
  2560.                 (run ("%s PRESET installdata/locale/%s/standard.display" studio_regedit studio_language))
  2561.  
  2562.                 ; choose a font
  2563.  
  2564.                 (run bin "installdata/programs/installfont file=golded:etc/registry/presets/standard.display")
  2565.  
  2566.                 ; install registry
  2567.  
  2568.                 (copyfiles
  2569.  
  2570.                     (source "installdata/registry/registry")
  2571.  
  2572.                     (dest "golded:etc/registry")
  2573.                 )
  2574.  
  2575.                 ; remove write protection for material copied from CD-ROM
  2576.  
  2577.                 (run "installdata/programs/unprotect basedir=golded:etc/registry")
  2578.  
  2579.                 ; save install path and serial code in registry
  2580.  
  2581.                 (run ("golded:add-ons/regedit/regedit SERIAL=\"%s\" INSTALLPATH=\"%s\"" studio_serial (expandpath "")))
  2582.             )
  2583.         )
  2584.  
  2585.         ; install starters
  2586.  
  2587.         (if (bitand studio_components @studio_components_starter)
  2588.  
  2589.             (
  2590.                 (if (bitand studio_starter @studio_starter_ed)
  2591.  
  2592.                     (copyfiles
  2593.  
  2594.                         (source "installdata/golded/ed")
  2595.  
  2596.                         (dest "golded:")
  2597.                     )
  2598.                 )
  2599.  
  2600.                 (if (bitand studio_starter @studio_starter_appicon)
  2601.  
  2602.                     (
  2603.                         (copyfiles
  2604.  
  2605.                             (source "installdata/golded/Drag & Drop")
  2606.  
  2607.                             (dest "golded:")
  2608.                         )
  2609.  
  2610.                         (copyfiles
  2611.  
  2612.                             (source "installdata/golded/Drag & Drop.info")
  2613.  
  2614.                             (dest "golded:")
  2615.                         )
  2616.                     )
  2617.                 )
  2618.             )
  2619.         )
  2620.  
  2621.         ; install documentation
  2622.  
  2623.         (if (bitand studio_components @studio_components_docs)
  2624.  
  2625.             (
  2626.                 (if (bitand studio_manual @studio_manual_history)
  2627.  
  2628.                     (copyfiles
  2629.  
  2630.                         (source "installdata/golded/History")
  2631.  
  2632.                         (dest "golded:")
  2633.                     )
  2634.                 )
  2635.  
  2636.                 (if (bitand studio_manual @studio_manual_licence)
  2637.  
  2638.                     (
  2639.                         (copyfiles
  2640.  
  2641.                             (source "installdata/golded/Licence")
  2642.  
  2643.                             (dest "golded:")
  2644.                         )
  2645.  
  2646.                         (copyfiles
  2647.  
  2648.                             (source "installdata/golded/Licence.info")
  2649.  
  2650.                             (dest "golded:")
  2651.                         )
  2652.                     )
  2653.                 )
  2654.  
  2655.                 (if (bitand studio_manual @studio_manual_order)
  2656.  
  2657.                     (
  2658.                         (copyfiles
  2659.  
  2660.                             (source "installdata/golded/Order")
  2661.  
  2662.                             (dest "golded:")
  2663.                         )
  2664.  
  2665.                         (copyfiles
  2666.  
  2667.                             (source "installdata/golded/Order.info")
  2668.  
  2669.                             (dest "golded:")
  2670.                         )
  2671.                     )
  2672.                 )
  2673.  
  2674.                 (if (bitand studio_manual @studio_manual_english)
  2675.  
  2676.                     (
  2677.                         (copyfiles
  2678.  
  2679.                             (source "installdata/golded/Manual")
  2680.  
  2681.                             (dest "golded:")
  2682.                         )
  2683.  
  2684.                         (copyfiles
  2685.  
  2686.                             (source "installdata/golded/Manual.info")
  2687.  
  2688.                             (dest "golded:")
  2689.                         )
  2690.                     )
  2691.                 )
  2692.  
  2693.                 (if (bitand studio_manual @studio_manual_german)
  2694.  
  2695.                     (
  2696.                         (copyfiles
  2697.  
  2698.                             (source "installdata/golded/Anleitung")
  2699.  
  2700.                             (dest "golded:")
  2701.                         )
  2702.  
  2703.                         (copyfiles
  2704.  
  2705.                             (source "installdata/golded/Anleitung.info")
  2706.  
  2707.                             (dest "golded:")
  2708.                         )
  2709.                     )
  2710.                 )
  2711.             )
  2712.         )
  2713.  
  2714.         ; install screenshot
  2715.  
  2716.         (if (bitand studio_components @studio_components_screenshot)
  2717.  
  2718.             (
  2719.                 (copyfiles
  2720.  
  2721.                     (source "installdata/golded/Screenshot")
  2722.  
  2723.                     (dest "golded:")
  2724.                 )
  2725.  
  2726.                 (copyfiles
  2727.  
  2728.                     (source "installdata/golded/Screenshot.info")
  2729.  
  2730.                     (dest "golded:")
  2731.                 )
  2732.             )
  2733.         )
  2734.  
  2735.         ; install developer material
  2736.  
  2737.         (if (bitand studio_components @studio_components_developer)
  2738.  
  2739.             (
  2740.                 (makedir "golded:developer")
  2741.  
  2742.                 (copyfiles
  2743.  
  2744.                     (source "installdata/golded/developer")
  2745.  
  2746.                     (dest "golded:developer")
  2747.  
  2748.                     (all)
  2749.                 )
  2750.             )
  2751.         )
  2752.  
  2753.         ; install recovery program
  2754.  
  2755.         (if (bitand studio_components @studio_components_recover)
  2756.  
  2757.             (
  2758.                 (copyfiles
  2759.  
  2760.                     (source "installdata/golded/Recover")
  2761.  
  2762.                     (dest "golded:")
  2763.                 )
  2764.  
  2765.                 (copyfiles
  2766.  
  2767.                     (source "installdata/golded/Recover.info")
  2768.  
  2769.                     (dest "golded:")
  2770.                 )
  2771.             )
  2772.         )
  2773.  
  2774.         ; install add-onds (to-do)
  2775.  
  2776.         (if (bitand studio_components @studio_components_addons)
  2777.  
  2778.             (
  2779.                 (working #studio_addons_install)
  2780.  
  2781.                 (if (bitand studio_addons_a @studio_addons_envwww)
  2782.  
  2783.                     (
  2784.                         (set studio_installpath "installdata/golded/add-ons/envWWW30/setup")
  2785.  
  2786.                         (studio_proc_install)
  2787.                     )
  2788.                 )
  2789.  
  2790.                 (if (bitand studio_addons_a @studio_addons_envgde)
  2791.  
  2792.                     (
  2793.                         (set studio_installpath "installdata/golded/add-ons/envGDE15/setup")
  2794.  
  2795.                         (studio_proc_install)
  2796.                     )
  2797.                 )
  2798.  
  2799.                 (if (bitand studio_addons_a @studio_addons_envthe)
  2800.  
  2801.                     (
  2802.                         (set studio_installpath "installdata/golded/add-ons/envTHE10/setup")
  2803.  
  2804.                         (studio_proc_install)
  2805.                     )
  2806.                 )
  2807.  
  2808.                 (if (bitand studio_addons_a @studio_addons_envcpp)
  2809.  
  2810.                     (
  2811.                         (set studio_installpath "installdata/golded/add-ons/envCPP25/setup")
  2812.  
  2813.                         (studio_proc_install)
  2814.                     )
  2815.                 )
  2816.  
  2817.                 (if (bitand studio_addons_a @studio_addons_envstm)
  2818.  
  2819.                     (
  2820.                         (set studio_installpath "installdata/golded/add-ons/envSTM25/setup")
  2821.  
  2822.                         (studio_proc_install)
  2823.                     )
  2824.                 )
  2825.  
  2826.                 (if (bitand studio_addons_a @studio_addons_envsas)
  2827.  
  2828.                     (
  2829.                         (set studio_installpath "installdata/golded/add-ons/envSAS10/setup")
  2830.  
  2831.                         (studio_proc_install)
  2832.                     )
  2833.                 )
  2834.  
  2835.                 (if (bitand studio_addons_b @studio_addons_envasm)
  2836.  
  2837.                     (
  2838.                         (set studio_installpath "installdata/golded/add-ons/envASM13/setup")
  2839.  
  2840.                         (studio_proc_install)
  2841.                     )
  2842.                 )
  2843.  
  2844.                 (if (bitand studio_addons_b @studio_addons_envbat)
  2845.  
  2846.                     (
  2847.                         (set studio_installpath "installdata/golded/add-ons/envBAT13/setup")
  2848.  
  2849.                         (studio_proc_install)
  2850.                     )
  2851.                 )
  2852.  
  2853.                 (if (bitand studio_addons_b @studio_addons_envfax)
  2854.  
  2855.                     (
  2856.                         (set studio_installpath "installdata/golded/add-ons/envFAX10/setup")
  2857.  
  2858.                         (studio_proc_install)
  2859.                     )
  2860.                 )
  2861.  
  2862.                 (if (bitand studio_addons_b @studio_addons_envmdt)
  2863.  
  2864.                     (
  2865.                         (set studio_installpath "installdata/golded/add-ons/envMDT23/setup")
  2866.  
  2867.                         (studio_proc_install)
  2868.                     )
  2869.                 )
  2870.  
  2871.                 (if (bitand studio_addons_b @studio_addons_envthr)
  2872.  
  2873.                     (
  2874.                         (set studio_installpath "installdata/golded/add-ons/envTHR10/setup")
  2875.  
  2876.                         (studio_proc_install)
  2877.                     )
  2878.                 )
  2879.  
  2880.                 (if (bitand studio_addons_b @studio_addons_envjcy)
  2881.  
  2882.                     (
  2883.                         (set studio_installpath "installdata/golded/add-ons/envJCY50/setup")
  2884.  
  2885.                         (studio_proc_install)
  2886.                     )
  2887.                 )
  2888.  
  2889.                 (if (bitand studio_addons_c @studio_addons_envprt)
  2890.  
  2891.                     (
  2892.                         (set studio_installpath "installdata/golded/add-ons/envPRT63/setup")
  2893.  
  2894.                         (studio_proc_install)
  2895.                     )
  2896.                 )
  2897.  
  2898.                 (if (bitand studio_addons_c @studio_addons_envrcs)
  2899.  
  2900.                     (
  2901.                         (set studio_installpath "installdata/golded/add-ons/envRCS11/setup")
  2902.  
  2903.                         (studio_proc_install)
  2904.                     )
  2905.                 )
  2906.  
  2907.                 (if (bitand studio_addons_c @studio_addons_envins)
  2908.  
  2909.                     (
  2910.                         (set studio_installpath "installdata/golded/add-ons/envINS10/setup")
  2911.  
  2912.                         (studio_proc_install)
  2913.                     )
  2914.                 )
  2915.  
  2916.                 (if (bitand studio_addons_c @studio_addons_envwrp)
  2917.  
  2918.                     (
  2919.                         (set studio_installpath "installdata/golded/add-ons/envWRP10/setup")
  2920.  
  2921.                         (studio_proc_install)
  2922.                     )
  2923.                 )
  2924.  
  2925.                 (if (bitand studio_addons_c @studio_addons_envreg)
  2926.  
  2927.                     (
  2928.                         (set studio_installpath "installdata/golded/add-ons/envREG10/setup")
  2929.  
  2930.                         (studio_proc_install)
  2931.                     )
  2932.                 )
  2933.  
  2934.                 (if (bitand studio_addons_c @studio_addons_envswp)
  2935.  
  2936.                     (
  2937.                         (set studio_installpath "installdata/golded/add-ons/envSWP10/setup")
  2938.  
  2939.                         (studio_proc_install)
  2940.                     )
  2941.                 )
  2942.             )
  2943.         )
  2944.  
  2945.         (run "installdata/programs/unprotect basedir=golded:")
  2946.     )
  2947. )
  2948.  
  2949. ; remove components (input: <studio_remove>)
  2950.  
  2951. (procedure studio_proc_removecomponents
  2952.  
  2953.     (
  2954.         ; remove editor
  2955.  
  2956.         (if (bitand studio_remove @studio_components_golded)
  2957.  
  2958.             (delete "golded:GoldED")
  2959.         )
  2960.  
  2961.         ; remove starters
  2962.  
  2963.         (if (bitand studio_remove @studio_components_starter)
  2964.  
  2965.             (
  2966.                 (if (bitand studio_removestarter @studio_starter_ed)
  2967.  
  2968.                     (delete "golded:ed")
  2969.                 )
  2970.  
  2971.                 (if (bitand studio_removestarter @studio_starter_appicon)
  2972.  
  2973.                     (delete "golded:Drag & drop")
  2974.                 )
  2975.             )
  2976.         )
  2977.  
  2978.         ; remove documentation
  2979.  
  2980.         (if (bitand studio_remove @studio_components_docs)
  2981.  
  2982.             (
  2983.                 (if (bitand studio_removemanual @studio_manual_history)
  2984.  
  2985.                     (delete "golded:History")
  2986.                 )
  2987.  
  2988.                 (if (bitand studio_removemanual @studio_manual_licence)
  2989.  
  2990.                     (delete "golded:Licence")
  2991.                 )
  2992.  
  2993.                 (if (bitand studio_removemanual @studio_manual_order)
  2994.  
  2995.                     (delete "golded:Order")
  2996.                 )
  2997.  
  2998.                 (if (bitand studio_removemanual @studio_manual_english)
  2999.  
  3000.                     (delete "golded:Manual")
  3001.                 )
  3002.  
  3003.                 (if (bitand studio_removemanual @studio_manual_german)
  3004.  
  3005.                     (delete "golded:Anleitung")
  3006.                 )
  3007.             )
  3008.         )
  3009.  
  3010.         ; remove developer material
  3011.  
  3012.         (if (bitand studio_remove @studio_components_developer)
  3013.  
  3014.             ("run delete golded:developer all quiet")
  3015.         )
  3016.  
  3017.         ; remove screenshot
  3018.  
  3019.         (if (bitand studio_remove @studio_components_screenshot)
  3020.  
  3021.             (delete "golded:Screenshot")
  3022.         )
  3023.  
  3024.         ; remove recovery program
  3025.  
  3026.         (if (bitand studio_remove @studio_components_recover)
  3027.  
  3028.             (delete "golded:Recover")
  3029.         )
  3030.  
  3031.         ; remove add-ons
  3032.  
  3033.         (if (bitand studio_remove @studio_components_addons)
  3034.  
  3035.             (
  3036.                 (if (bitand studio_removeaddons_a @studio_addons_envwww)
  3037.  
  3038.                     (
  3039.                         (set studio_installpath "installdata/golded/add-ons/envWWW30/setup")
  3040.  
  3041.                         (studio_proc_uninstall)
  3042.                     )
  3043.                 )
  3044.  
  3045.                 (if (bitand studio_removeaddons_a @studio_addons_envgde)
  3046.  
  3047.                     (
  3048.                         (set studio_installpath "installdata/golded/add-ons/envGDE15/setup")
  3049.  
  3050.                         (studio_proc_uninstall)
  3051.                     )
  3052.                 )
  3053.  
  3054.                 (if (bitand studio_removeaddons_a @studio_addons_envthe)
  3055.  
  3056.                     (
  3057.                         (set studio_installpath "installdata/golded/add-ons/envTHE10/setup")
  3058.  
  3059.                         (studio_proc_uninstall)
  3060.                     )
  3061.                 )
  3062.  
  3063.                 (if (bitand studio_removeaddons_a @studio_addons_envcpp)
  3064.  
  3065.                     (
  3066.                         (set studio_installpath "installdata/golded/add-ons/envCPP25/setup")
  3067.  
  3068.                         (studio_proc_uninstall)
  3069.                     )
  3070.                 )
  3071.  
  3072.                 (if (bitand studio_removeaddons_a @studio_addons_envstm)
  3073.  
  3074.                     (
  3075.                         (set studio_installpath "installdata/golded/add-ons/envSTM25/setup")
  3076.  
  3077.                         (studio_proc_uninstall)
  3078.                     )
  3079.                 )
  3080.  
  3081.                 (if (bitand studio_removeaddons_a @studio_addons_envsas)
  3082.  
  3083.                     (
  3084.                         (set studio_installpath "installdata/golded/add-ons/envSAS10/setup")
  3085.  
  3086.                         (studio_proc_uninstall)
  3087.                     )
  3088.                 )
  3089.  
  3090.                 (if (bitand studio_removeaddons_b @studio_addons_envasm)
  3091.  
  3092.                     (
  3093.                         (set studio_installpath "installdata/golded/add-ons/envASM13/setup")
  3094.  
  3095.                         (studio_proc_uninstall)
  3096.                     )
  3097.                 )
  3098.  
  3099.                 (if (bitand studio_removeaddons_b @studio_addons_envbat)
  3100.  
  3101.                     (
  3102.                         (set studio_installpath "installdata/golded/add-ons/envBAT13/setup")
  3103.  
  3104.                         (studio_proc_uninstall)
  3105.                     )
  3106.                 )
  3107.  
  3108.                 (if (bitand studio_removeaddons_b @studio_addons_envfax)
  3109.  
  3110.                     (
  3111.                         (set studio_installpath "installdata/golded/add-ons/envFAX10/setup")
  3112.  
  3113.                         (studio_proc_uninstall)
  3114.                     )
  3115.                 )
  3116.  
  3117.                 (if (bitand studio_removeaddons_b @studio_addons_envmdt)
  3118.  
  3119.                     (
  3120.                         (set studio_installpath "installdata/golded/add-ons/envMDT23/setup")
  3121.  
  3122.                         (studio_proc_uninstall)
  3123.                     )
  3124.                 )
  3125.  
  3126.                 (if (bitand studio_removeaddons_b @studio_addons_envthr)
  3127.  
  3128.                     (
  3129.                         (set studio_installpath "installdata/golded/add-ons/envTHR10/setup")
  3130.  
  3131.                         (studio_proc_uninstall)
  3132.                     )
  3133.                 )
  3134.  
  3135.                 (if (bitand studio_removeaddons_b @studio_addons_envjcy)
  3136.  
  3137.                     (
  3138.                         (set studio_installpath "installdata/golded/add-ons/envJCY50/setup")
  3139.  
  3140.                         (studio_proc_uninstall)
  3141.                     )
  3142.                 )
  3143.  
  3144.                 (if (bitand studio_removeaddons_c @studio_addons_envprt)
  3145.  
  3146.                     (
  3147.                         (set studio_installpath "installdata/golded/add-ons/envPRT63/setup")
  3148.  
  3149.                         (studio_proc_uninstall)
  3150.                     )
  3151.                 )
  3152.  
  3153.                 (if (bitand studio_removeaddons_c @studio_addons_envrcs)
  3154.  
  3155.                     (
  3156.                         (set studio_installpath "installdata/golded/add-ons/envRCS11/setup")
  3157.  
  3158.                         (studio_proc_uninstall)
  3159.                     )
  3160.                 )
  3161.  
  3162.                 (if (bitand studio_removeaddons_c @studio_addons_envins)
  3163.  
  3164.                     (
  3165.                         (set studio_installpath "installdata/golded/add-ons/envINS10/setup")
  3166.  
  3167.                         (studio_proc_uninstall)
  3168.                     )
  3169.                 )
  3170.  
  3171.                 (if (bitand studio_removeaddons_c @studio_addons_envwrp)
  3172.  
  3173.                     (
  3174.                         (set studio_installpath "installdata/golded/add-ons/envWRP10/setup")
  3175.  
  3176.                         (studio_proc_uninstall)
  3177.                     )
  3178.                 )
  3179.  
  3180.                 (if (bitand studio_removeaddons_c @studio_addons_envreg)
  3181.  
  3182.                     (
  3183.                         (set studio_installpath "installdata/golded/add-ons/envREG10/setup")
  3184.  
  3185.                         (studio_proc_uninstall)
  3186.                     )
  3187.                 )
  3188.  
  3189.                 (if (bitand studio_removeaddons_c @studio_addons_envswp)
  3190.  
  3191.                     (
  3192.                         (set studio_installpath "installdata/golded/add-ons/envSWP10/setup")
  3193.  
  3194.                         (studio_proc_uninstall)
  3195.                     )
  3196.                 )
  3197.             )
  3198.         )
  3199.     )
  3200. )
  3201.  
  3202. ; ------------------------------ error handling --------------------------------
  3203.  
  3204. (onerror
  3205.  
  3206.     (studio_proc_cleanup)
  3207.  
  3208.     (if (> @ioerr 0) 
  3209.  
  3210.         (
  3211.             ; set return code
  3212.  
  3213.             (delete "env:studioinstall")
  3214.  
  3215.             (textfile
  3216.  
  3217.                 (dest "env:studioinstall")
  3218.  
  3219.                 (append "INSTALLERROR")
  3220.             )
  3221.  
  3222.             (message
  3223.  
  3224.                 (cat #studio_installerror @ioerr)
  3225.             )
  3226.         )
  3227.     )
  3228.  
  3229.     (exit (quiet))
  3230. )
  3231.  
  3232. ; ------------------- check return code of previous installation ---------------
  3233.  
  3234. (if (exists "env:studioinstall" (noreq))
  3235.  
  3236.     ; (getenv) may not be used without checking if var exists (installer bug)
  3237.  
  3238.     (set studio_install_code
  3239.  
  3240.         (getenv "studioinstall")
  3241.     )
  3242.  
  3243.     (set studio_install_code "OK")
  3244. )
  3245.  
  3246. (if (= studio_install_code "INSTALLERROR")
  3247.  
  3248.     (
  3249.         (message #studio_notify)
  3250.     )
  3251. )
  3252.  
  3253. (delete "env:studioinstall")
  3254.  
  3255. (textfile
  3256.  
  3257.     (dest "env:studioinstall")
  3258.  
  3259.     (append "INCOMPLETE")
  3260. )
  3261.  
  3262. ; ---------------------------------- check setup -------------------------------
  3263.  
  3264. (if (exists "golded5.readme")
  3265.  
  3266.     (set studio_commercial 0)
  3267.     (set studio_commercial 1)
  3268. )
  3269.  
  3270. ; ----------------------------- find old installation --------------------------
  3271.  
  3272. (if (exists "golded:" (noreq))
  3273.  
  3274.     (
  3275.         (set studio_installdir (pathonly (expandpath "golded:")))
  3276.  
  3277.         (set studio_found
  3278.  
  3279.             (askbool
  3280.  
  3281.                 (prompt #studio_found)
  3282.  
  3283.                 (choices
  3284.  
  3285.                     #studio_found_confirm
  3286.                     #studio_found_newinstall
  3287.                 )
  3288.  
  3289.                 (help #studio_found_help)
  3290.             )
  3291.         )
  3292.     )
  3293.  
  3294.     (if (exists "work:" (noreq))
  3295.  
  3296.         (set studio_installdir "work:")
  3297.         (set studio_installdir "sys:")
  3298.     )
  3299. )
  3300.  
  3301. ; ---------------------------------- welcome -----------------------------------
  3302.  
  3303. (if (not (exists "env:" (noreq)))
  3304.  
  3305.     (
  3306.         (makedir "ram:env")
  3307.  
  3308.         (makeassign "env" "ram:")
  3309.     )
  3310. )
  3311.  
  3312. (if (= studio_found @studio_missing)
  3313.  
  3314.     (
  3315.         (message #studio_welcome)
  3316.  
  3317.         (welcome)
  3318.     )
  3319. )
  3320.  
  3321. (run "run <>NIL: installdata/programs/stopgolded")
  3322.  
  3323. ; --------------------------------- choose a path ------------------------------
  3324.  
  3325. ; create installation directory and temporary assign
  3326.  
  3327. (while (= studio_path "")
  3328.  
  3329.     (if (= studio_found @studio_found)
  3330.  
  3331.         (set studio_path (expandpath "golded:"))
  3332.  
  3333.         ; ELSE
  3334.  
  3335.         (
  3336.             ; keep requesting path until valid choice is made
  3337.  
  3338.             (set studio_repeat 1)
  3339.  
  3340.             (while (= studio_repeat 1)
  3341.  
  3342.                 (set studio_installdir
  3343.  
  3344.                     (askdir
  3345.  
  3346.                         (prompt #studio_path_choose)
  3347.  
  3348.                         (help #studio_path_choose_help)
  3349.  
  3350.                         (default studio_installdir)
  3351.                     )
  3352.                 )
  3353.  
  3354.                 (if (exists studio_installdir)
  3355.  
  3356.                     (set studio_repeat 0)
  3357.                     (set studio_repeat 1)
  3358.                 )
  3359.             )
  3360.  
  3361.             (set studio_path (tackon studio_installdir "Studio"))
  3362.  
  3363.             (if (exists studio_path)
  3364.  
  3365.                 (
  3366.                     (set studio_overwrite
  3367.  
  3368.                         (askbool
  3369.  
  3370.                             (prompt #studio_overwrite)
  3371.  
  3372.                             (choices
  3373.  
  3374.                                 #studio_overwrite_install
  3375.                                 #studio_overwrite_cancel
  3376.                             )
  3377.  
  3378.                             (help #studio_overwrite_help)
  3379.                         )
  3380.                     )
  3381.  
  3382.                     (if (= studio_overwrite 0)
  3383.  
  3384.                         (set studio_path "")
  3385.                     )
  3386.                 )
  3387.             )
  3388.         )
  3389.     )
  3390.  
  3391.     (if (<> studio_path "")
  3392.  
  3393.         ; installation of commercial version over demo version (and vice versa) is not supported
  3394.  
  3395.         (if (or (and (exists (tackon studio_path "demo") (noreq)) (= studio_commercial 1)) (and (exists (tackon studio_path "GoldED") (noreq)) (= studio_commercial 0)))
  3396.  
  3397.             (
  3398.                 (message #studio_demo)
  3399.  
  3400.                 (set studio_path "")
  3401.  
  3402.                 (set studio_found @studio_missing)
  3403.             )
  3404.  
  3405.             ; ELSE
  3406.  
  3407.             (
  3408.                 (set @default-dest studio_path)
  3409.  
  3410.                 ; check existing installation
  3411.  
  3412.                 (if (exists studio_path (noreq))
  3413.  
  3414.                     (
  3415.                         ; fairly complete installation ?
  3416.  
  3417.                         (if (and (exists (tackon studio_path "golded")) (exists (tackon studio_path "etc/registry/registry")))
  3418.  
  3419.                             (
  3420.                                 (set studio_update studio_path)
  3421.  
  3422.                                 (studio_proc_checksetup)
  3423.                             )
  3424.  
  3425.                             (
  3426.                                 ; repeat full initial installation
  3427.  
  3428.                                 (set studio_update "")
  3429.                             )
  3430.                         )
  3431.                     )
  3432.  
  3433.                     (makedir studio_path)
  3434.                 )
  3435.  
  3436.                 ; create assign
  3437.  
  3438.                 (makeassign "golded" studio_path)
  3439.  
  3440.                 ; verify assign
  3441.  
  3442.                 (if (not (exists "golded:" (noreq)))
  3443.  
  3444.                     (
  3445.                         (set studio_path "")
  3446.  
  3447.                         (set studio_found @studio_missing)
  3448.                     )
  3449.                 )
  3450.             )
  3451.         )
  3452.     )
  3453. )
  3454.  
  3455. ; install drawer icon
  3456.  
  3457. (set studio_drawer (cat studio_path ".info"))
  3458.  
  3459. (if (not (exists studio_drawer))
  3460.  
  3461.     (
  3462.         (copyfiles
  3463.  
  3464.             (source "installdata/workbench/drawer.info")
  3465.  
  3466.             (dest studio_installdir)
  3467.  
  3468.             (newname (fileonly studio_drawer))
  3469.         )
  3470.  
  3471.         (tooltype
  3472.  
  3473.             (dest studio_drawer)
  3474.  
  3475.             (noposition)
  3476.         )
  3477.     )
  3478. )
  3479.  
  3480. ; validate directory structure
  3481.  
  3482. (makedir "golded:add-ons")
  3483. (makedir "golded:add-ons/regedit")
  3484. (makedir "golded:etc")
  3485. (makedir "golded:etc/api")
  3486. (makedir "golded:etc/autorun")
  3487. (makedir "golded:etc/catalogs")
  3488. (makedir "golded:etc/charsets")
  3489. (makedir "golded:etc/env")
  3490. (makedir "golded:etc/fonts")
  3491. (makedir "golded:etc/images")
  3492. (makedir "golded:etc/images/sys")
  3493. (makedir "golded:etc/images/toolbar")
  3494. (makedir "golded:etc/images/wb")
  3495. (makedir "golded:etc/libs")
  3496. (makedir "golded:etc/recordings")
  3497. (makedir "golded:etc/registry")
  3498. (makedir "golded:etc/registry/presets")
  3499. (makedir "golded:etc/rexx")
  3500. (makedir "golded:etc/scanner")
  3501. (makedir "golded:etc/sessions")
  3502. (makedir "golded:etc/syntax")
  3503. (makedir "golded:etc/uninstall")
  3504. (makedir "golded:etc/updates")
  3505. (makedir "golded:etc/xref")
  3506.  
  3507. ; always update registry editor
  3508.  
  3509. (studio_proc_installregedit)
  3510.  
  3511. ; validate disk
  3512.  
  3513. (if (= studio_commercial 1)
  3514.  
  3515.     (if (<> (getsize "installdata/keyfile/keyfile") 67108864)
  3516.  
  3517.         (
  3518.             ; set return code
  3519.  
  3520.             (delete "env:studioinstall")
  3521.  
  3522.             (textfile
  3523.  
  3524.                 (dest "env:studioinstall")
  3525.  
  3526.                 (append "INSTALLERROR")
  3527.             )
  3528.  
  3529.             (abort #studio_ioerr)
  3530.         )
  3531.     )
  3532. )
  3533.  
  3534. ; ---------------------------------- register ----------------------------------
  3535.  
  3536. (if (or (= studio_yourname "") (= studio_serial ""))
  3537.  
  3538.     (while (= studio_registered 0)
  3539.  
  3540.         (set studio_repeat 1)
  3541.  
  3542.         (while (= studio_repeat 1)
  3543.  
  3544.             (set studio_yourname
  3545.  
  3546.                 (askstring
  3547.  
  3548.                     (prompt  #studio_yourname)
  3549.                     (help    #studio_yourname_help)
  3550.  
  3551.                     (default studio_yourname)
  3552.                 )
  3553.             )
  3554.  
  3555.             (if (= studio_yourname "")
  3556.  
  3557.                 (message #studio_yourname_help)
  3558.             )
  3559.  
  3560.             (if (= studio_yourname "")
  3561.  
  3562.                 (set studio_repeat 1)
  3563.                 (set studio_repeat 0)
  3564.             )
  3565.         )
  3566.  
  3567.         ; get serial number
  3568.  
  3569.         (if (= studio_commercial 1)
  3570.  
  3571.             (
  3572.                 (set studio_repeat 1)
  3573.  
  3574.                 (while (= studio_repeat 1)
  3575.  
  3576.                     (set studio_serial
  3577.  
  3578.                         (askstring
  3579.  
  3580.                             (prompt  #studio_serial)
  3581.                             (help    #studio_serial_help)
  3582.                             (default studio_serial)
  3583.                         )
  3584.                     )
  3585.  
  3586.                     (if (= studio_serial "")
  3587.  
  3588.                         (message #studio_serial_help)
  3589.                     )
  3590.  
  3591.                     (if (= (strlen studio_serial) 21)
  3592.  
  3593.                         (set studio_repeat 0)
  3594.                         (set studio_repeat 1)
  3595.                     )
  3596.                 )
  3597.             )
  3598.  
  3599.             ; ELSE
  3600.  
  3601.             (set studio_serial "Serial No. 0 (Demo)")
  3602.         )
  3603.  
  3604.         (set studio_registered
  3605.  
  3606.             (askbool
  3607.  
  3608.                 (prompt (#studio_check studio_yourname studio_serial))
  3609.  
  3610.                 (choices
  3611.  
  3612.                     #studio_check_continue
  3613.                     #studio_check_repeat
  3614.                 )
  3615.  
  3616.                 (help @askbool-help)
  3617.             )
  3618.         )
  3619.     )
  3620. )
  3621.  
  3622. ; ------------------------------- choose installation mode ---------------------
  3623.  
  3624. (set studio_installtype @studio_installtype_normal)
  3625.  
  3626. ; new installation ?
  3627.  
  3628. (if (= studio_update "")
  3629.  
  3630.     (set studio_installtype
  3631.  
  3632.         (askchoice
  3633.  
  3634.             (prompt #studio_installtype)
  3635.  
  3636.             (choices
  3637.  
  3638.                 #studio_installtype_minimum
  3639.                 #studio_installtype_user
  3640.                 #studio_installtype_normal
  3641.             )
  3642.  
  3643.             (help #studio_installtype_help)
  3644.  
  3645.             (default studio_installtype)
  3646.         )
  3647.     )
  3648. )
  3649.  
  3650. ; --------------------------------- choose components --------------------------
  3651.  
  3652. (if (= studio_update "")
  3653.  
  3654.     ; install new
  3655.  
  3656.     (
  3657.         (if (= studio_installtype @studio_installtype_minimum)
  3658.  
  3659.             (
  3660.                 (set studio_components @studio_components_golded)
  3661.                 (set studio_starter    0)
  3662.                 (set studio_manual     0)
  3663.                 (set studio_addons_a   0)
  3664.                 (set studio_addons_b   0)
  3665.                 (set studio_addons_c   0)
  3666.             )
  3667.  
  3668.             ; typical installation
  3669.  
  3670.             (
  3671.                 (set studio_components (- @studio_components_all @studio_components_addons))
  3672.                 (set studio_starter    @studio_components_all)
  3673.                 (set studio_manual     @studio_components_all)
  3674.                 (set studio_addons_a   0)
  3675.                 (set studio_addons_b   0)
  3676.                 (set studio_addons_c   0)
  3677.             )
  3678.         )
  3679.  
  3680.         (if (= studio_installtype @studio_installtype_user)
  3681.  
  3682.             (
  3683.                 ; choose categories
  3684.  
  3685.                 (set studio_components
  3686.  
  3687.                     (askoptions
  3688.  
  3689.                         (prompt #studio_components_install)
  3690.  
  3691.                         (choices
  3692.  
  3693.                             #studio_components_golded
  3694.                             #studio_components_starter
  3695.                             #studio_components_docs
  3696.                             #studio_components_addons
  3697.                             #studio_components_developer
  3698.                             #studio_components_screenshot
  3699.                             #studio_components_recover
  3700.                         )
  3701.  
  3702.                         (help #studio_components_help)
  3703.  
  3704.                         (default studio_components)
  3705.                     )
  3706.                 )
  3707.  
  3708.                 ; choose subcategories
  3709.  
  3710.                 (studio_proc_chooseparts)
  3711.             )
  3712.         )
  3713.  
  3714.         ; always install presets and registry when installing the editor
  3715.  
  3716.         (if (bitand studio_components @studio_components_golded)
  3717.  
  3718.             (
  3719.                 (studio_proc_chooselanguage)
  3720.  
  3721.                 (set studio_components (bitor studio_components @studio_components_config))
  3722.             )
  3723.         )
  3724.  
  3725.         ; edit user-startup
  3726.  
  3727.         (studio_proc_startup)
  3728.  
  3729.         ; install everything
  3730.  
  3731.         (studio_proc_installcomponents)
  3732.  
  3733.         (run "installdata/programs/moveicons <>NIL: grid dir=golded: dx=70 dy=65 columns=4 files GoldED \"Drag & Drop\" Recover Licence Uninstall Order Anleitung Manual Screenshot")
  3734.  
  3735.         ; install autorun macro
  3736.  
  3737.         (copyfiles
  3738.  
  3739.             (source "installdata/autorun/golded.rexx")
  3740.  
  3741.             (dest "golded:etc/autorun")
  3742.         )
  3743.  
  3744.         (run "golded:add-ons/regedit/regedit autorunrexx golded:etc/autorun/golded.rexx autodelete")
  3745.     )
  3746.  
  3747.     ; install over old installation
  3748.  
  3749.     (
  3750.         ; keep showing update menu
  3751.  
  3752.         (while (<> studio_updatemode @updatemode_exit)
  3753.  
  3754.             (
  3755.                 (set studio_updatemode
  3756.  
  3757.                     (askchoice
  3758.  
  3759.                         (prompt studio_path)
  3760.  
  3761.                         (choices
  3762.  
  3763.                             #studio_updatemode_reinstall
  3764.                             #studio_updatemode_add
  3765.                             #studio_updatemode_remove
  3766.                             #studio_updatemode_presets
  3767.                             #studio_updatemode_registry
  3768.                             #studio_updatemode_startup
  3769.                             #studio_updatemode_exit
  3770.                         )
  3771.  
  3772.                         (default studio_updatemode)
  3773.  
  3774.                         (help #studio_updatemode_help)
  3775.                     )
  3776.                 )
  3777.  
  3778.                 (if (or (= studio_updatemode @updatemode_add) (= studio_updatemode @updatemode_reinstall))
  3779.  
  3780.                     (
  3781.                         ; set defaults (none in <add> mode, installed components in <update> mode)
  3782.  
  3783.                         (if (= studio_updatemode @updatemode_add)
  3784.  
  3785.                             (
  3786.                                 (set studio_components 0)
  3787.                                 (set studio_starter    0)
  3788.                                 (set studio_manual     0)
  3789.                                 (set studio_addons_a   0)
  3790.                                 (set studio_addons_b   0)
  3791.                                 (set studio_addons_c   0)
  3792.                             )
  3793.                         )
  3794.  
  3795.                         (set studio_components
  3796.  
  3797.                             (askoptions
  3798.  
  3799.                                 (prompt #studio_components_update)
  3800.  
  3801.                                 (choices
  3802.  
  3803.                                     #studio_components_golded
  3804.                                     #studio_components_starter
  3805.                                     #studio_components_docs
  3806.                                     #studio_components_addons
  3807.                                     #studio_components_developer
  3808.                                     #studio_components_screenshot
  3809.                                     #studio_components_recover
  3810.                                 )
  3811.  
  3812.                                 (help #studio_components_help)
  3813.  
  3814.                                 (default studio_components)
  3815.                             )
  3816.                         )
  3817.  
  3818.                         (studio_proc_chooseparts)
  3819.  
  3820.                         (studio_proc_installcomponents)
  3821.  
  3822.                         (studio_proc_checksetup)
  3823.  
  3824.                         (run "installdata/programs/moveicons <>NIL: grid dir=golded: dx=70 dy=65 columns=4 files GoldED \"Drag & Drop\" Recover Licence Uninstall Order Anleitung Manual Screenshot")
  3825.                     )
  3826.                 )
  3827.  
  3828.                 (if (= studio_updatemode @updatemode_remove)
  3829.  
  3830.                     (
  3831.                         (set studio_remove
  3832.  
  3833.                             (askoptions
  3834.  
  3835.                                 (prompt #studio_components_remove)
  3836.  
  3837.                                 (choices
  3838.  
  3839.                                     #studio_components_golded
  3840.                                     #studio_components_starter
  3841.                                     #studio_components_docs
  3842.                                     #studio_components_addons
  3843.                                     #studio_components_developer
  3844.                                     #studio_components_screenshot
  3845.                                     #studio_components_recover
  3846.                                 )
  3847.  
  3848.                                 (help #studio_components_help)
  3849.  
  3850.                                 (default 0)
  3851.                             )
  3852.                         )
  3853.  
  3854.                         (studio_proc_removeparts)
  3855.  
  3856.                         (studio_proc_removecomponents)
  3857.  
  3858.                         (studio_proc_checksetup)
  3859.  
  3860.                         (run "installdata/programs/moveicons <>NIL: grid dir=golded: dx=70 dy=65 columns=4 files GoldED \"Drag & Drop\" Recover Licence Uninstall Order Anleitung Manual Screenshot")
  3861.                     )
  3862.                 )
  3863.  
  3864.                 (if (= studio_updatemode @updatemode_presets)
  3865.  
  3866.                     (studio_proc_installpresets)
  3867.                 )
  3868.  
  3869.                 (if (= studio_updatemode @updatemode_registry)
  3870.  
  3871.                     (studio_proc_registry)
  3872.                 )
  3873.  
  3874.                 (if (= studio_updatemode @updatemode_startup)
  3875.  
  3876.                     (studio_proc_startup)
  3877.                 )
  3878.             )
  3879.         )
  3880.     )
  3881. )
  3882.  
  3883. ; ------------------------------------- done -----------------------------------
  3884.  
  3885. (studio_proc_savecfg)
  3886.  
  3887. (studio_proc_cleanup)
  3888.  
  3889. ; set return code
  3890.  
  3891. (delete "env:studioinstall")
  3892.  
  3893. (textfile
  3894.  
  3895.     (dest "env:studioinstall")
  3896.  
  3897.     (append "OK")
  3898. )
  3899.  
  3900. (complete 100)
  3901.  
  3902. (if (= studio_reboot 1)
  3903.  
  3904.     (exit #studio_reboot)
  3905.     (exit)
  3906. )
  3907.  
  3908. (welcome)
  3909.